Bonjour à toutes et à tous,
J'ai un code que je n'arrive pas à trouver et pourtant , les exemples ne manques pas.
Mais je ne sais pas pourquoi, je n'y arrive pas.
Je souhaite qu'une image soit affichée ou masquée en fonction du changement du résultat d'une cellule qui contient une formule.
Voici le code sur lequel je travaille :
Je joins un fichier test.
Un grand merci à toutes et à tous.
Bonne fin de dimanche,
Amicalement,
Lionel,
J'ai un code que je n'arrive pas à trouver et pourtant , les exemples ne manques pas.
Mais je ne sais pas pourquoi, je n'y arrive pas.
Je souhaite qu'une image soit affichée ou masquée en fonction du changement du résultat d'une cellule qui contient une formule.
Voici le code sur lequel je travaille :
Code:
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("b1")) Is Nothing Then
If [b1] <> 0 Then
ActiveSheet.Shapes("Image 1").Visible = False
Else
ActiveSheet.Shapes("Image 1").Visible = True
End If
End If
End Sub
Je joins un fichier test.
Un grand merci à toutes et à tous.
Bonne fin de dimanche,
Amicalement,
Lionel,