lancer macro a l'ouverture en testant une cellule

[wrap food]

Bonjour à tous

J'aimerais de l'aide sur le problème suivant:

Je souhaite lancer un macro à l'ouverture d'un fichier.
il faudrait que si la cellule A8 est vide la macro 1 ce lance et si la cellule A8 est rempli il ne se passe rien .

J'ai bien essayé d'utiliser le code suivant mais cela ne fonctionne pas

Private Sub Worksheet_Change(ByVal Target As Range)

If Not Intersect(Target, Range("D3")) Is Nothing Then
If Range("D3").Value <> "" Then MaMecro
End If
End Sub


Je pense que cela est du à Worksheet_Change

comment peut-on tester une cellule sans passer par la fonction Change??

Par avance merci de votre aide.

 

[Pierrot93]

Re : lancer macro a l'ouverture en testant une cellule

Bonjour,

essaye ceci, à placer dans le module "thisworkbook", se déclenche à l'ouverture du classeur :

Option Explicit
Private Sub Workbook_Open()
If Sheets("NomFeuille").Range("D3").Value <> "" Then MaMecro
End Sub

bonne journée
@+

 

[wrap food]

Re : lancer macro a l'ouverture en testant une cellule

Super un grand merci