Discussion :

[benjy777]

Bonjour,

J'ai plusieurs graphiques que je souhaiterais envoyer dans une nouvelle page que je crée avant dans mon code, (j'ai fais cela car je voulais qu'en ajoutant plusieurs graphique la mise en page se fasse toute seule (les tableaux se rangent automatiquement sur la page et non les uns sur les autres) mais je crois qu'en fait je vais devoir la faire dans mon code?).

Voilà je crée un nom "jesuislenom" de page à entrer pour que le code puisse être réutilisé plusieurs fois à la suite. Mais ce nom n'est pas reconnu dans ma dernière ligne de code lorsque je tente d'envoyer mon graphique vers cette page qui porte le nom "jesuislenom"précédemment choisi.

Code :

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

1
2
3
jesuislenom= TextBox1.Value
Charts.Add2
ActiveChart.Name = jesuislenom

//ensuite je crée mon graphique puis,

Code :

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

ActiveChart.Location Where:=xlLocationAsObject, Name:=jesuislenom

C'est donc dans cette dernière ligne que provient le problème.

Et dans le même temps si vous avez une meileure astuce pour mettre en page plusieurs graphiques plus facilement je suis tout ouïe

Merci de votre aide

[nouveauvba]

Bonjour je ne suis pas spécialiste, débutant en vba (et autodidacte).
Mais si je comprends bien le code, le graphique se nomme jesuislenom et tu as une feuille du même nom......

Code :

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

ActiveChart.Name = jesuislenom

As tu essayé un truc comme ça:

Code :

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

1
2
3
4
5
6
7
Sub testv()
Dim jesuislenom As String
jesuislenom = "tutu"
Sheets.Add.name = jesuislenom
Charts.Add.name = "graphique"& jesuislenom
ActiveChart.Location Where:=xlLocationAsObject, name:=jesuislenom
End Sub

et après tu déroules ton code de création du graphique.

C'est juste une idée

[Invité]

Bonsoir,
https://www.developpez.net/forums/d1...a/#post8059544