Discussion :

[nono le golfeur]

J'ai à peu de chose près le même problème que dans cette discussion !

Vos différentes techniques fonctionnent pas mal, mais moi j'ai 7 graphs différents (créé automatiquement) que j'aimerais aligné car sinon ils restent les uns sur les autres...

Le problème c'est comment leur donner un noms car à chaque fois que je lance ma macro qui créer mes graphs le numéro de ceux-ci augmentent !

Graphique 1 .... Graphique 2 .... Graphique 3....

Donc je ne sais pas trop comment faire !

Curahee dit :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
Sub Creation_Graphe()
 
    ' ...Creation graphe ...
 
    ' Nommage du graph actif
    ActiveSheet.ChartObjects(ActiveChart.Parent.Name).Name = "Graphe_Test"
 
    ' Placement et dimensionnement
    Placer_Graphique "Graphe_Test", Range("K3"), Range("S17")
 
End Sub

Ca peu peut-etre m'aider mais comment etre sur qu'il selectionne le bon graph ???

Merci, @++

Arnaud

[jacklem]

Je pense qu'on peut: (mais je ne suis pas expert )

soit nommer chaque graph et le disposer dès sa création :

Charts.Add
ActiveChart.Location Where:=xlLocationAsNewSheet, Name:="Graphe_Test_" & numéro

ou encore les créer-nommer :

Charts.Add.Name ="Graphe_Test_" & numéro ' attention pas de " := " ici !!)

puis les disposer ensuite comme voulu (par .top et .left )