Bonjour,

mon pb est le suivant:
Je dispose d'un classeur contenant des graphiques ds des 'charts' et non ds des 'sheets'.
J'aimerais suivant certains critères copiés automatiquement certains graphiques ds une mm sheet, et donc bien sur les bien les loger.

J'ai essayé d'enregistrer une macro et regarder le code.
j'obtiens ceci:


Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
Sheets("XX Chart").Select   
    Sheets("XXChart").Copy Before:=Sheets(4)
    Sheets("XX Chart (2)").Select
    ActiveChart.PlotArea.Select
    ActiveChart.Location Where:=xlLocationAsObject, Name:="Charts Summary"
    ActiveSheet.Shapes("XX Chart").IncrementLeft -179.25
    ActiveSheet.Shapes("Chart 6").IncrementTop -147#
    ActiveSheet.Shapes("Chart 6").ScaleHeight 0.62, msoFalse, msoScaleFromTopLeft
    ActiveSheet.Shapes("Chart 6").ScaleWidth 0.72, msoFalse, msoScaleFromTopLeft

Mon pb est que je ne sais pas à quoi correspond "cahart 6". Du coup je ne sais pas comment lui dire de selectionner tel ou tel graphe.
N'est il pas possible d'utiliser directement des noms?

J'ai essayé des activechart.name=myname, ensuite remplacer "chart 6" par myname mais sans succès.


Merci de votre aide.