Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Changer un type de graph selon un critère

solenn

XLDnaute Nouveau
Bonjour,

Dans la cellule B2, il y a une liste déroulante (Choix entre Pommes, poires et figues) en lien avec un tableau sur les quantités. J'ai réalisé un graphique du tableau sur les quantités du fruit choisit dans la liste déroulante.

Pouvez-vous m'aider à changer le type de graphique selon le fruit ? Par exemple je souhaite que le graphique soit en courbe pour les pommes et poire et en histogrammes pour les figues.

Merci d'avance
 

Pièces jointes

  • exemple.xls
    17.5 KB · Affichages: 38
  • exemple.xls
    17.5 KB · Affichages: 45
  • exemple.xls
    17.5 KB · Affichages: 46

kjin

XLDnaute Barbatruc
Re : Changer un type de graph selon un critère

Bonjour et bienvenue,
Macro evenementielle dans le module de la feuille
Code:
Private Sub Worksheet_Change(ByVal Target As Range)
Dim cht As Chart
If Target.Address = "$B$2" And Target.Count = 1 Then
    Set cht = ActiveSheet.ChartObjects(1).Chart 'ou l'index ou le nom du graphique
    Select Case Target
        Case "pommes", "poires"
            cht.ChartType = xlLineMarkers
        Case "figues"
            cht.ChartType = xlColumnClustered
    End Select
End If
End Sub
A+
kjin
 

solenn

XLDnaute Nouveau
Re : Changer un type de graph selon un critère

Je suis dsl mais quand je copie ta macro, elle m'indique "erreur de compilation". Pourtant j'ai bien collé dans le module de la feuille et indiqué le nom du graph.
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…