XL 2016 Insertion feuille graphique

tontonexcel · 2 Mai 2021

Bonjour à tous

J'ai un souci pour insérer une feuille graphique après une autre feuille dans un VBA, je ne comprends pas pourquoi la feuille s'insère avant la feuille "SOURCE" et pas après comme spécifié dans ma syntaxe (cf fichier) je ne saisi pas s'il s'agit d'un problème lié à Excel j'ai repris la syntaxe de la doc microsoft (Lien)

Merci

sylvanu · 2 Mai 2021

Bonsoir Tontonexcel,
C'est original.
Mais comme je m'autorise à tricher, testez cette macro :

VB:

Sub graphe_feuille()
Dim graph As Chart
Set graph = Charts.Add(After:=Sheets("SOURCE"))
With graph
    .Move After:=Sheets("SOURCE")
    .SetSourceData Sheets("SOURCE").Range("A1").CurrentRegion
    .Name = "Histo vente"
End With
Set graph = Nothing
End Sub

tontonexcel · 2 Mai 2021

Bonsoir Sylvanu
Merci ! Effectivement c'est tricher j'avais pensé au Move, mais je compte bien appeler Microsoft pour avoir des éclaircissements du coup je peux simplifier

VB:

Set graph = Charts.Add

Voila, voila... sinon si quelqu'un a une explication je suis preneur

XL 2016 Insertion feuille graphique

tontonexcel

XLDnaute Occasionnel

Pièces jointes

sylvanu

XLDnaute Barbatruc

tontonexcel

XLDnaute Occasionnel

Discussions similaires