[Excel] Macro création de graphique

Fermé
saiyuke - 27 mars 2009 à 15:30
 rayan - 30 sept. 2009 à 13:35
Bonjour,

Je vous remercie d'avoir commencé à lire mon message.

Alors : j'ai un fichier Excel plein de feuilles (une feuille par mois : "jan" "fév" "mar" "avr"...) et chaque fois contient un tableau tout bête avec 2 lignes (X et Y) et 10 colonnes de données.

Le problème c'est que je souhaiterais créer une MACRO dans une nouvelle feuille "RAPPORT" qui créerait AUTANT de graphique qu'il y a de feuille mensuelle...

Pensez-vous que c'est possible?
A voir également:

1 réponse

m@rina Messages postés 20077 Date d'inscription mardi 12 juin 2007 Statut Contributeur Dernière intervention 25 avril 2024 11 272
27 mars 2009 à 19:36
Bonjour,

Oui c'est tout à fait possible. Un petit exemple minimaliste :

Sub graphs()

Dim feuille As Worksheet
Dim plage As Range
'on déclare un tableau avec tous les noms des feuilles
Set feuilles = Sheets(Array("janv", "fev", "mars", "avril")) 

For Each feuille In feuilles
'on détermine la plage des données source
Set plage = feuille.Range("A1:J2")
Charts.Add
    With ActiveChart
        .ChartType = xlColumnClustered
        .SetSourceData Source:=plage
    End With
Next
End Sub


Après il faut que tu peaufines en fonction du graph souhaités, légendes, couleurs, type de graph, etc, etc.

m@rina

2
j'ai le même probléme je veux automatiser un grahpyque sur 7 feuilles mais j'arrive tjr pas
0