bonjour à tout le monde...

je reviens sur un sujet que j'avais déjà soumis mais qui finalement me donne une erreur 13

jfontaine m'avait proposé une solution qui me convenait parfaitement don je remercie encore mais une fois en pratique ça me renvoi une erreur d'exécution '13' incompatibilité de type

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
Private Sub Worksheet_Change(ByVal Target As Range)
 
'l'erreur renvoyé est sur cette ligne 
If Target.Address = "$D$3" And Target.Value <> "" Then Mamacro 
End Sub
alors si je rentre une valeur en D3 et valide ok ça execute bien ma macro...
Là ou ça me donne une erreur 13 c'est lorsque je vide la cellule...

Merci pour votre aide

et bon week end à tous.
Tim