Afficher un onglet-graphique caché d'un bouton

Bonjour,

Sur un des onglets de mon fichier Excel, j'ai un tableau avec pas mal de données dedans.

Pour rendre la lecture plus simple des données, je souhaite proposer à l'utilisateur d'accéder via un bouton à la version graphique du tableau. Le graphique est stocké sur un autre onglet (onglet-graphique) et est en onglet caché dans le fichier.

Ma question: Comment faire pour démasquer cet onglet-graphique et le rendre visible à l'utilisateur quand il clique sur le bouton? (Je précise qu'il s'agit bien d'un onglet-graphique et pas d'un onglet Excel standard).

Merci mille fois pour votre aide!

Mathieu

Bonjour,

Voici une solution possible

Sub MasquerAfficherObjetGraphique()
    Dim ws As Worksheet
    Dim obj As OLEObject

    ' Remplacez "Feuil1" par le nom de la feuille contenant l'objet graphique
    Set ws = ThisWorkbook.Sheets("Feuil1")

    ' Remplacez "ObjetGraphique1" par le nom de l'objet OLE que vous souhaitez masquer/afficher
    Set obj = ws.OLEObjects("ObjetGraphique1")

    ' Vérifiez si l'objet est actuellement visible
    If obj.Visible = False Then
        ' Affichez l'objet graphique
        obj.Visible = True
    Else
        ' Masquez l'objet graphique
        obj.Visible = False
    End If
End Sub