Bonjour à tous,

Je sais que ce sujet a été abordé pas mal de fois. Cependant, malgré avoir lu beaucoup de posts, je n'ai toujours pas résolu mon problème !

J'ai ce bout de code qui me permet d'afficher un graphique avec un range de données.

J'aimerais agrandir ce graphique.. mais je n'y arrive pas :/
Par exemple doubler la taille du graphique et le positionner quelque part sur la feuille


Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
Sub Test()
 
Sheets(4).Activate
ActiveSheet.Shapes.AddChart.Select
 
With ActiveChart
   .HasTitle = True
   .ChartTitle.Text = MyTitle
   .SetSourceData Source:= MyRange
   .ChartType = xlLine
End With
 
End Sub

Merci beaucoup =)