Lancer une macro

[Jean-Marc]

Bonsoir,

Dans une classeur rempli de liaisons externes (DDE), je souhaite lancer des macros selon la valeur d'une unique cellule (par macro).

J'ai essayé avec succès ceci (en résumé):

Sub Worksheet_Change(ByVal Target As Range)

IF Range("A1")=1 Then Macro1
IF Range("U50")=1 Then Macro2
...
End Sub

Mais mes cellules liées sont remises à jour et changent constamment. Donc la macro est lancée quasiment en permanence, ce que je voudrais éviter...

Ma question est la suivante: est-il possible de créer une macro événementielle liée à une cellule ?

 

[vincent]

Bonsoir

Si c'est bien ce que tu demandes rajoute au debut de ton code

if target.address<>range("la cellule que tu veux").address then exit sub

Ceci va tester quelle cellule vient d'etre modifier et si ce n'est pas la cellule que tu veux la macro s'arrete

Bonne soirée

@+Vincent

 

[Jean-Marc]

Bonsoir,

Merci pour cette solution.
Pour être honnête, j'en ai trouvé une autre:

J'ai simplement isolé les cellules qui doivent lancer mes macros dans une nouvelle feuille surveillée par une macro "Worksheet_Change".

Bonne soirée

A+
Jean-Marc

 

[vincent]

Re

La multiplication des solutions est la meilleur des choses.

Bonne soirée

@+Vincent