remplacement de boutons de commande

[David]

Bonjour,

J'ai crée 2 procédures chaque fois déclenchées via un click dans
2 boutons de commande placées sur la même page EXCEL (sheet4)
Private Sub CommandButton1_Click()
Private Sub CommandButton2_Click()

Je préfererais plutôt qu'elles soient activées dès que l'utilisateur
se positionne sur une cellule de sheet4 ou clique sur l'onglet sheet4
en bas..

Bonne soirée

David

 

[Robert]

Salut David, salut le forum,

Pour lancer la procédure en cliquant sur l'onglet Sheet4 en bas il te faut ecrire son code dans l'événement Activate de l'objet Sheet4 ou (traduis en français commun...), dans Visual Basic Editor, double clique dans la fenêtre Projet (à gauche) sur Sheet4, choisis l'objet Worksheet (en haut), puis l'événement Activate (en haut à droite). Place ton code entre les lignes...

Private Sub Worksheet_Activate()

End Sub

Inconvénient : si tu veux la lancer et que tu es déja sur l'onglet Sheet4, il te faudra sélectionner un autre onglet puis revenir à sheet4...

Pour le faire au positionnement sur une cellule de sheet4, idem mais choisis l'événement SelectionChange au lieu de Activate.
Place ton code entre les lignes :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = '$A$1' Then 'à adapter à ton cas

End If
End Sub

Inconvénient : si sans le vouloir un utilisateur sélectionne la cellule cible la procédure est lancée...