Discussion :

[lovelyrory]

Bonjour,

J'ai une macro qui exécute qui fait en sorte que si la valeur de la Cellule B83 est "oui" alors elle affiche "À faire". Elle fonctionne très bien.

Mais j'aimerais que cette macro soit exécutée automatiquement lorsque l'on ait entré la donnée de B83.

J'ai donc fait une autre Macro sur la feuille de la cellule B83:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Private Sub Worksheet_Change()
 
If Target.Address = "$B$83" Then MacroCléUSB
 
End Sub

Mais tout ce que ca fait c'est ouvrir la fenêtre des Macros... Je ne veux pas que ca ouvre la fenêtre je veux que ça exécute sans que l'utilisateur n'ait à intervenir.
Quelqu'un saurait??

Merci d'avance!

[mercatog]

Ta MacroCleUSB est elle sur le même module de feuille ou sur un module standard?

[lovelyrory]

Sur un module standard.

[mercatog]

déjà

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Private Sub Worksheet_Change(ByVal Target As Range)

[lovelyrory]

Bon ben finalement, j'ai trouvé moi même... Par essai erreur!

Dans ma macro Change j'ai mis ma formule de l'autre Macro; comme suit

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Private Sub Worksheet_Change(ByVal Target As Range)
 
     If Range("B83").Value = "oui" Then Worksheets("Type de dossier").Range("D30").Value = "À faire"
 
End Sub

Merci quand même!