XL 2016 Insertion feuille graphique

[tontonexcel]

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]

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

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]

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

Set graph = Charts.Add

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