Mise en Forme Graphique

[NicolasC91]

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 :/

--------------------------------------------------------------------------
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 =)

 

[tototiti2008]

Re : Mise en Forme Graphique

Bonjour Nicolas,

Agrandir, oui, mais comment ?

Connais-tu l'enregistreur de macros ?

peut-être :

.ScaleWidth 2, msoFalse, msoscalefromtopleft
.ScaleHeight 2, msoFalse, msoscalefromtopleft

Edit : Oups, désolé, ne marche pas sur 2007 (d'ailleurs pas sûr que ça marchait autre part...)

 

[NicolasC91]

Re : Mise en Forme Graphique

Oui je connais l'enregistreur de macro mais il ne fonctionne pas lorsque agrandie mon graphique.

En fait je veux agrandir mon graphique (disons doubler la taille) et le positionner après.

Je ne vois vraiment pas comment faire :/

Merci

 

[NicolasC91]

Re : Mise en Forme Graphique

Quelqu'un pourrait-il m'aider ?

J'ai fait tout mon possible mais je n'y arrive pas :/