T
tjihy
Guest
Bonjour tout le monde,
avant tout je tiens à préciser que j'ai bien vu le topic qui porte le même intitulé sauf qu'il ne répond pas à ma question.
au fait j'ai un graphe sur une feuille Excel que je voudrais redimensionner à l'aide d'une macro. j'ai utilisé l'enregistreur de macros d'Excel sauf qu'il renome à chaque fois mon graphe du coup la macro ne marche plus.
j'ai essayé de contourner le problème ainsi :
Dim graph As Object
Worksheets("Normalite").Activate
For Each graph In ActiveSheet.ChartObjects
graph.Activate
ActiveChart.ChartArea.Select
graph.ScaleHeight 1.51, msoFalse, _
msoScaleFromBottomRight
graph.ScaleHeight 1.35, msoFalse, _
msoScaleFromTopLeft
Next
mais ça bloque au niveau indiqué...
je ne sais pas si j'ai été assez clair...
merci d'avance...
avant tout je tiens à préciser que j'ai bien vu le topic qui porte le même intitulé sauf qu'il ne répond pas à ma question.
au fait j'ai un graphe sur une feuille Excel que je voudrais redimensionner à l'aide d'une macro. j'ai utilisé l'enregistreur de macros d'Excel sauf qu'il renome à chaque fois mon graphe du coup la macro ne marche plus.
j'ai essayé de contourner le problème ainsi :
Dim graph As Object
Worksheets("Normalite").Activate
For Each graph In ActiveSheet.ChartObjects
graph.Activate
ActiveChart.ChartArea.Select
graph.ScaleHeight 1.51, msoFalse, _
msoScaleFromBottomRight
graph.ScaleHeight 1.35, msoFalse, _
msoScaleFromTopLeft
Next
mais ça bloque au niveau indiqué...
je ne sais pas si j'ai été assez clair...
merci d'avance...