XL 2016 Insertion feuille graphique

tontonexcel

XLDnaute Occasionnel
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
 

Pièces jointes

  • graphe.xlsm
    14.1 KB · Affichages: 13

sylvanu

XLDnaute Barbatruc
Supporter XLD
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

XLDnaute Occasionnel
Bonsoir Sylvanu
Merci ! Effectivement c'est tricher j'avais pensé au Move, mais je compte bien appeler Microsoft pour avoir des éclaircissements :p du coup je peux simplifier
VB:
Set graph = Charts.Add
Voila, voila... sinon si quelqu'un a une explication je suis preneur ;)
 

Discussions similaires

Réponses
6
Affichages
301