quitter un USF

roro69

XLDnaute Impliqué

• 9 Décembre 2008

• #2

Re : quitter un USF

Bonjour à essayer

Private Sub UserForm_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
If Shift = 0 Then Unload Me
End Sub
A ++

 

Dernière édition: 9 Décembre 2008

Vote positif 0 Vote négatif

JORDAN

XLDnaute Impliqué

• 9 Décembre 2008

• #3

Re : quitter un USF

Bonjour Roro,
merci pour ton code, juste un petit hic
comment je l applique
je l ai bien integré dans mon projet, mais que faire apres

merci

 

Vote positif 0 Vote négatif

roro69

XLDnaute Impliqué

• 9 Décembre 2008

• #4

Re : quitter un USF

Re bonjour Jordan ne tiens pas compte de ma premère réponses
colle ce code dans ton projet et comme ceci ton userform se fermera avec la touche entrée du clavier.

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

Cliquez pour agrandir...

par contre pour la sauvegarde il faudrait en dire un peu plus.......
A++

 

Vote positif 0 Vote négatif

JORDAN

XLDnaute Impliqué

• 9 Décembre 2008

• #5

Re : quitter un USF

re,

je viens de faire comme tu dis, mais lorsque je fais ENTREE ça fait la meme fonction que tabulation et l usf ne se ferme pas
Merci si tu as 1 solution
a+

 

Vote positif 0 Vote négatif

JORDAN

XLDnaute Impliqué

• 9 Décembre 2008

• #6

Re : quitter un USF

bonsoir tout le monde
je viens de tester la methode de Roro dans un nouveau classeur, et elle fonctionne tres bien
Par contre dans mon classeur y a rien à faire ça ne veut pas
je viens de penser que le probleme venait peut etre du fait que j ai 5 USF dans mon projet.
quelqu un a t il deja rencontré ce probleme ?
merci pour vos astuces

 

Vote positif 0 Vote négatif

JORDAN

XLDnaute Impliqué

• 9 Décembre 2008

• #7

Re : quitter un USF

re,
je viens de faire un nouveau test dans un nouveau classeur
si il n y a qu un seul usf, ça fonctionne tres bien mais que je met un 2eme USF, ça ne fonctionne plus !!!
là, j avoue ne rien comprendre
merci pour vos idées
bonne soirée

 

Vote positif 0 Vote négatif

MJ13

XLDnaute Barbatruc

• 9 Décembre 2008

• #8

Re : quitter un USF

Bonjour à tous

Allez Jordan (355 posts quand même), un petit effort, un petit fcihier et le tour est joué😕.

 

Vote positif 0 Vote négatif

roro69

XLDnaute Impliqué

• 9 Décembre 2008

• #9

Re : quitter un USF

Bonsoir Jordan
Je viens de voir pourquoi çà ne marche pas ;en fait le code marche si l'usf est dénué de tout controles;car la touche entrée intéragit avec les controles donc il faudrait choisir un autre touche du clavier pour fermer l'USF TOUT EN SACHANT ;que alt+F4 font çà sans aucune ligne de code lol
A++
M'enfin tu peut toujours changer de touche de clavier en changeant le chiffre dans le code; il faut chercher n° DU CODE ascii de ta touche et remplacer le chiffre.

 

Vote positif 0 Vote négatif

JORDAN

XLDnaute Impliqué

• 10 Décembre 2008

• #10

Re : quitter un USF

Bonjour tout le monde,

J ai bien essayé avec une autre combinaison de touche, ça reste sans succes
quand à ALT+F4 j ai 2 probleme :
1- ça met l usf en hide et pas en unload
2- j ouvre 1 er usf et en cliquant sur 1 bouton je le ferme et en ouvre un autre
et avec ALT+F4, ça ferme tout
bonne journée

 

Vote positif 0 Vote négatif