Images et case à cocher

Bonjour,

Est-ce possible de cacher une image quand une case à cocher est décocher, et l'afficher quand la case à cocher est cochée ?

J'arrive à le faire avec une mise en forme conditionelle pour le texte mais pas pour une image.

Merci d'avance !!

Marc

Bonjour et bienvenue,

Valable pour case à cocher "Formulaire"

1) cellule liée à la case à cocher ici en "c9"

2) tu lui associe ce code dans un module

3) tu remplace "Picture 8" par le nom de ton image

Sub AfficheImage()
    If Range("c9") = False Then
        ActiveSheet.Shapes("Picture 8").Visible = False
    Else
        ActiveSheet.Shapes("Picture 8").Visible = True
    End If
End Sub

Amicalement

Claude

Question surement très bête, mais comment je nomme mon image ??

Merci !!!!

-- 24 Sep 2010, 13:23 --

Merci, j'ai trouvé

Bon we

marc

Bonjour,

Avec un CheckBox issu de la boîte à outils "Contrôles"

Le code :

Private Sub CheckBox1_Click()
Me.Shapes("Picture 2").Visible = Me.CheckBox1
End Sub

Nom de l'image à adapter...

Bonne journée

Rechercher des sujets similaires à "images case cocher"