[Excel] Macro création de graphique

saiyuke -  
 rayan -
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

Réponse 1 / 1
m@rina Messages postés 23933 Date d'inscription   Statut Contributeur Dernière intervention   11 465
 
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
rayan
 
j'ai le même probléme je veux automatiser un grahpyque sur 7 feuilles mais j'arrive tjr pas
0