Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Ouvrir usf avec F1,F2,F3

geraldvc

XLDnaute Junior
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
 

geraldvc

XLDnaute Junior
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
 

Pièces jointes

  • ctrl+q.xlsx
    7.8 KB · Affichages: 71

Pierrot93

XLDnaute Barbatruc
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):
Code:
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...
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…