Fond de tâche macro Excel
fclint
Messages postés
3
Date d'inscription
dimanche 22 août 2004
Statut
Membre
Dernière intervention
28 avril 2010
-
30 sept. 2004 à 19:23
cs_Joh76 Messages postés 47 Date d'inscription dimanche 16 mars 2008 Statut Membre Dernière intervention 14 octobre 2009 - 2 janv. 2009 à 18:59
cs_Joh76 Messages postés 47 Date d'inscription dimanche 16 mars 2008 Statut Membre Dernière intervention 14 octobre 2009 - 2 janv. 2009 à 18:59
1 réponse
cs_Joh76
Messages postés
47
Date d'inscription
dimanche 16 mars 2008
Statut
Membre
Dernière intervention
14 octobre 2009
3
2 janv. 2009 à 18:59
2 janv. 2009 à 18:59
Salut,
Il faut que tu utilises l'évènement Private Sub Workbook_SheetSelectionChange qui se trouve dans ThisWorkbook dans le VBE.
Lorsque tu cliques sur une cellule de n'importe quelle feuille cet évènement est appellé.
Admettons que ce soit la cellule A2 de la feuille1 qui t'intéresse:
Copie cette macro dans ThisWorkbook:
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
If Target.AddressLocal = Feuil1.Range("A2").AddressLocal Then
MsgBox "Lancement de la macro", vbInformation
End If
End Sub
Cordialement
Il faut que tu utilises l'évènement Private Sub Workbook_SheetSelectionChange qui se trouve dans ThisWorkbook dans le VBE.
Lorsque tu cliques sur une cellule de n'importe quelle feuille cet évènement est appellé.
Admettons que ce soit la cellule A2 de la feuille1 qui t'intéresse:
Copie cette macro dans ThisWorkbook:
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
If Target.AddressLocal = Feuil1.Range("A2").AddressLocal Then
MsgBox "Lancement de la macro", vbInformation
End If
End Sub
Cordialement