Afficher/Masquer un objet dans une feuille Excel

Bonjour et bonne année !!!!!!!!!

J'ai trouvé un vieux sujet car il correspondait à ce que je cherchait .

https://forum.excel-pratique.com/excel/afficher-cacher-une-image-sous-condition-t25247.html

Cependant je ne comprend bien pas comment m'y prendre , pour nommer l'objet puis comment l'utiliser en VBA .

En gros j'aimerai faire apparaitre une flèche lorsque la cellule D8 est selectionnée et sinon la flèche n apparait pas, j'ai tenté quelque chose dans ce style tout en sachant que la commande shapes ne fonctionnerait pas .

Code: Tout sélectionner

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

If Range("D8") = "" Then

Shapes(Flèchedroite1).Visible = True

Else

Shapes(Flèchedroite1).Visible = False

End If

End Sub

Toutes les idées sont les bienvenues

Merci

Tu y étais presque!

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Not Intersect(Target, Range("D8")) Is Nothing Then
        Shapes("Flèche droite 1").Visible = True
    Else
        Shapes("Flèche droite 1").Visible = False
    End If
End Sub

Merci pour ton aide .

Mais comment dois je m y prendre pour donner un nom a l objet , la fleche dans le cas present ?

Tout dépend de ta version d'excel...

Ca ca marche sur toutes les versions d'excel!

Sub toto()
Shapes("Flèche droite 1").name = "Lenouvonom"
end sub

J ai ete trop vite dans ma reponse , il suffit de selectionner la forme et la renommer dans la "zone nom"

Merci

Alors tu as 2007 ou 2010 Avec plaisir! Meilleurs voeux!

Oui 2010 .

Bonne annee