XL 2010 Désactiver la touche "Enter" lors de l'apparition d'un USF

kiki29

XLDnaute Barbatruc

• 27 Octobre 2020

• #2

Salut, Ce lien n'existe plus ?

 

Vote positif 0 Vote négatif

S

soan

XLDnaute Barbatruc

Inactif

• 28 Octobre 2020

• #3

Bonjour Magic_Doctor, kiki29,

pense à désactiver les 2 touches Enter.

exemple : Ce lien n'existe plus de MrExcel (MVP)

lis aussi le post #10 situé dessous !

soan

 

Dernière édition: 28 Octobre 2020

Vote positif 0 Vote négatif

Magic_Doctor

XLDnaute Barbatruc

• 28 Octobre 2020

• #4

Re,

Merci pour ces liens.
Je me doutais, après recherches, qu'il fallait utiliser OnKey "~". J'ai un peu tout essayé, mais pas moyen de désactiver la touche Enter.

 

Dernière édition: 29 Octobre 2020

Vote positif 0 Vote négatif

Magic_Doctor

XLDnaute Barbatruc

• 29 Octobre 2020

• #5

Bonsoir,

Je reviens sur cet épineux sujet avec un exemple.
Le CommandButton lance un USF où l'on doit rentrer un mot de passe.
On n'a droit qu'à 3 essais.
Le mot de passe est "zaza".
On peut, à tout moment, fermer l'USF en appuyant sur la touche clavier "Esc".
Le problème : bloquer la touche clavier "Enter" quand l'USF est présent.

Merci d'avance pour m'aider à dompter la touche "Enter".

 

Pièces jointes

• Pb USF Touche Enter.xlsm

  62.6 KB · Affichages: 12

Vote positif 0 Vote négatif

patricktoulon

XLDnaute Barbatruc

• 29 Octobre 2020

• #6

bonsoir
ajoute ceci dans le userform

VB:

Private Sub TextBoxMotPasse_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
If KeyCode = 13 Then KeyCode = 0
End Sub
Private Sub UserForm_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
If KeyCode = 13 Then KeyCode = 0
End Sub

 

Vote positif 0 Vote négatif

Magic_Doctor

XLDnaute Barbatruc

• 29 Octobre 2020

• #7

Re,

Je viens d'essayer. Ça marche déjà mieux, mais la touche "Enter" n'est pas totalement désactivée.
Quand l'USF apparaît : touche "Enter" --> l'USF se ferme, alors qu'il ne devrait se fermer que si l'on rentre le bon mot de passe ou si l'on appuie sur la touche "Esc".
Quand le TextBox est vide pour y recevoir le mot de passe, la touche "Enter" est maintenant bien désactivée. En revanche, quand défile le texte dans le TextBox et que l'on appuie sur la touche "Enter" --> l'USF se ferme.

 

Pièces jointes

• Pb USF Touche Enter (2).xlsm

  63.3 KB · Affichages: 3

Dernière édition: 29 Octobre 2020

Vote positif 0 Vote négatif