Ouvrir usf avec F1,F2,F3

[geraldvc]

Salut a toutes et tous,

Je suis a la recherche d'une commande pour ouvrir un userform avec F1 ou F2 ext

je vous explique: c'est un petit prog pour caisse enregistreuse donc si michele ouvre la caisse elle est sur usf 1 mais si caroline a un client il faut qu'elle ourvre sont usf2 (par la touche f2) et si michele reviens a sont client F1 pour avoir Usf1.

voilà si vous pouvez me filez un petit coup de main . @plus Gérald

 

[Pierrot93]

Re : Ouvrir usf avec F1,F2,F3

Bonjour,

regarde peut être dans l'aide vba du coté de "application.OnKey"...

bonne journée
@+

 

[geraldvc]

Re : Ouvrir usf avec F1,F2,F3

Ok déjà pas mal mais c'est avec ctrl + une lettre et j'aimerai une manipulation et non deux . je joint le fichier avec demo ctrl +Q
On cherche

 

[Pierrot93]

Re : Ouvrir usf avec F1,F2,F3

Re,

pas grand chose dans ton fichier... A noter le format xlsx ne prend pas en charge les macros...

@+

 

[geraldvc]

Re : Ouvrir usf avec F1,F2,F3

Désolé pas fait attention voici la bonne version

 

[Pierrot93]

Re : Ouvrir usf avec F1,F2,F3

Re,

pas tout compris, regarde peut être ceci, à placer dans le module "thisworkbook" (modifie la touche de fonction F1):

Option Explicit
Private Sub Workbook_Activate()
Application.OnKey "{F1}", "TaProcédure1"
End Sub
Private Sub Workbook_Deactivate()
Application.OnKey "{F1}"
End Sub

A noter, dans l'exemple ci-dessous "TaProcédure1" est une procédure placée dans un module standard...