Création de graphe avec macro

frttou Messages postés 8 Date d'inscription mercredi 1 juin 2016 Statut Membre Dernière intervention 12 juin 2016 - 2 juin 2016 à 14:28
jordane45 Messages postés 38144 Date d'inscription mercredi 22 octobre 2003 Statut Modérateur Dernière intervention 21 avril 2024 - 2 juin 2016 à 15:38
Bonjour,
j'ai un tableau qui contient des données dans 3 colonnes A, B , C, mon tableau contient 5 ligne c'est à dire jusqu'a la ligne A5,B5 et C5

j'ai créé une macro pour faire le graphe qui represente la colonne A et C mais il se bloque à la 3ème instruction ActiveSheet.Shapes.AddChart.Select

Sub graphe()

Range("A1:A5,C1:C5").Select
Range("C1").Activate
ActiveSheet.Shapes.AddChart.Select
ActiveChart.ChartType = xlPie
ActiveChart.SetSourceData Source:=Range("Feuil1!$A$1:$A$5;Feuil1!$C$1:$C$5" _
)
End Sub


si je change la colonne C par B tout marche sans problème

1 réponse

jordane45 Messages postés 38144 Date d'inscription mercredi 22 octobre 2003 Statut Modérateur Dernière intervention 21 avril 2024 344
2 juin 2016 à 15:38
Bonjour,

Tu as un tableau qui va jusqu' à la colonne C ....
Range("A1:A5,C1:C5").Select

Tu te places sur la colonne C ...
Range("C1").Activate

ne vois tu pas un problème .

Je pense que cette ligne est superflue et peut être retirée...
Sinon... à la place d'activer C1 ... tu te mets en D1 par exemple...
0
Rejoignez-nous