Discussion :

[Daejung]

Bonjour,

Le raccourci "Ctrl + f " peut être bien pratique pour recherche un mot dans un champ de formulaire mais c'est très dangereux quand l'utilisateur peut aussi utiliser la fonction "remplacer" et pas seulement "rechercher".

Y-a-t-il un moyen de désactiver cette fonction "remplacer" ou à défaut le raccourci clavier "Ctrl + f" lui-même ?

Merci

[jimbolion]

Daejung,

A ma connaissance la seule méthode permettant d'inhiber une touche ou une combinaison de touches est de spécifier sur chaque contrôle du formulaire et le formulaire lui même ce code (evenement sur touche appuyée) ce qui peut vite se montrer pénible mais sur certains formulaires sensibles why not ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
    If KeyCode = vbKeyF And Shift = acCtrlMask Then 'Catch Ctrl+A
        KeyCode = 0 'Suppress keypress
    End If

D'autres idées viendront peut être

JimBoLion

[Daejung]

Cela marche merci mais c'est vrai que cela est hyper lourd de devoir le mettre sur chaque contrôle.

mais laisser la possibilité de modifier un champ de tous les enregistrements en une seule manip est très dangereux, non? même si cela ne m'est encore jamais arrivé!

[jimbolion]

Daejung,

D'un coup me vient une idée à essayer

Dans l'AutoKeys pourquoi ne pas gérer Ctrl+F et envoyer sur une fonction avec une msgbox "Fonction inhibée" ou quelque chose du genre.

et en cherchant un plus, regarde ici : (je vois qu'une question similaire a déjà été posée).

http://www.developpez.net/forums/d12...ches-autokeys/

JimBoLion

[Daejung]

ok merci

je vais aller explorer cette autre piste

[jimbolion]

Daejung,

Donc une fonction de ce type :

Function Inhibe_touche()
Dim Reponse As Integer
Reponse = MsgBox("fonction non disponible !", vbInformation + vbOKOnly, "Aide")
End Function

Dans la macro Autokeys :



JimBoLion