Appel d'un userform à l'aide d'une touche du clavier

[koukou40]

Bonjour,

Je recherche le moyen d'appeler un userform à l'aide d'une touche du clavier, par exemple la touche "F1" !

Merci

koukou40...du 65

 

[roro69]

Re : Appel d'un userform à l'aide d'une touche du clavier

Bonsoir ce petit code
Private Sub Workbook_Open()
Call Raccourci
End Sub
Et ensuite dans module/
Sub Raccourci()
Application.OnKey "{F1}", "Rac"
End Sub
Sub Rac()
UserForm1.Show
End Sub

 

[koukou40]

Re : Appel d'un userform à l'aide d'une touche du clavier

Bonsoir ce petit code
Private Sub Workbook_Open()
Call Raccourci
End Sub
Et ensuite dans module/
Sub Raccourci()
Application.OnKey "{F1}", "Rac"
End Sub
Sub Rac()
UserForm1.Show
End Sub

Bonsoir Roro69 !

Je vais tester ce code, je reviens vers toi si j'ai des soucis !

A+

koukou40