Dans une macro attendre que l'utilisateur click sur une cellule
ejordan
Messages postés
1
Statut
Membre
-
Gyrus Messages postés 3360 Statut Membre -
Gyrus Messages postés 3360 Statut Membre -
Ma macro indique à l'utilisateur (MsgBox) de cliquer sur une cellule et dès que c'est fait elle doit récupérer le contenu de la cellule sélectionnée. Comment fait-on ? Mes tentatives aboutissent toutes peu ou prou à des boucles infinies d'attente de saisie ...
2 réponses
-
Il faut utiliser l'instruction DoEvents.
ci-dessous, exemple de code que j'ai développé, qui donne à l'utilisateur un temps de 30 secondes pour cliquer sur la cellule.
Sub sélection_cellule():
' routine de sélection cellule --------------------------------------------------------------------
temps_début = Timer
sel_init = Selection.Address
Do While Selection.Address = sel_init
If Timer > temps_début + 30 Then
MsgBox "temps de sélection écoulé - arrêt traitement "
Exit Sub
End If
DoEvents
Loop
' fin de routine --------------------------------------------------------------------
End Sub
-- -
Bonjour,
Un autre type de traitement en utilisant un Userform.
https://www.cjoint.com/c/EFEp51EmQXW
A+
