Macro lors de la sélection

Résolu
marc -  
 marc -
Bonjour,

Est-il possible d'affecter une macro non pas à un bouton mais lors de la sélection de la cellule un peu à l'image du lien hypertexte?

D'avance merci

A voir également:

1 réponse

f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713
 
Bonjour,

dans le VBA de la feuille: adaptez la cellule

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'sur selection A1 appel ma_macro
If Not Application.Intersect(Target, Range("A1")) Then
Call ma_macro
End If
End Sub
0
marc
 
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'sur selection A1 appel ma_macro
If Not Application.Intersect(Target, Range("L3")) Then
Call Onglet_Salaire
End If
End Sub

Petit détail je suis un novice :)
Ou je la colle cette macro? sous feuil1? je cré un nouveau module?
ps. j'ai le message
en cliquant sur L3 erreur 13
en cliquant sur une autre cellule variable objet ou bloc if non défini
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713
 
Re,

j'ai ecrit : dans le VBA de la feuille: adaptez la cellule j'aurai du ajouter ---> ou vous cliquez sur la cellule
0
eriiic Messages postés 24603 Date d'inscription   Statut Contributeur Dernière intervention   7 276
 
Bonjour à tous,

j'ai l'impression qu'un bout c'est perdu :
If Not Application.Intersect(Target, Range("A1")) Is Nothing Then

eric
0
marc
 
En effet,

ça marche au poil.

Merci à vous 2 !!!!!!!
0