position d'un graph avec VBA

TOFatJOB · 3 Mars 2005

Re bonjour à toutes et tous,

Mon pb :

comment écrire en VBA pour positionner un graphique dans la feuille, sous les données, par exemple le coin supérieur gauche en colonne C et 3 lignes sous la dernière utilisée par les données ?

:S

MichelXld · 3 Mars 2005

bonsoir

tu peux tester la macro ci dessous

Code:

...
i = Range('C65536').End(xlUp).Row + 3

With ActiveSheet.ChartObjects(1) '1er graphique de la feuille active
.Top = Cells(i, 3).Top 'position verticale graphique
.Left = Cells(i, 3).Left 'position horizontale graphique
'.Width = 300 ' largeur graphique
'.Height = 250 'hauteur graphique : adapter selon type de graphique & marges .....
End With
...

bonne soiree
MichelXld

TOFatJOB · 3 Mars 2005

Merci pour la réponse, mais j'ai une erreur à l'execution :

Erreur d'execution '1004'

La méthode 'Cells' de l'objet '_Global' à échoué

MichelXld · 3 Mars 2005

rebonsoir

tu peux tester en précisant le nom des feuilles ( par exemple Sheets('Feuil1') )

Code:

...
i = Sheets('Feuil1').Range('C65536').End(xlUp).Row + 3
With Sheets('Feuil1').ChartObjects(1) '1er graphiique de la feuille active
.Top = Sheets('Feuil1').Cells(i, 3).Top 'position verticale graphique
.Left = Sheets('Feuil1').Cells(i, 3).Left 'position horizontale graphique
'.Width = 300 ' largeur graphique
'.Height = 250 'hauteur graphique : adapter selon type de graphique & marges .....
End With
...

bonne soiree
MichelXld

position d'un graph avec VBA

TOFatJOB

XLDnaute Occasionnel

MichelXld

XLDnaute Barbatruc

TOFatJOB

XLDnaute Occasionnel

MichelXld

XLDnaute Barbatruc

Discussions similaires

position d'un graph avec VBA

TOFatJOB

XLDnaute Occasionnel

MichelXld

XLDnaute Barbatruc

TOFatJOB

XLDnaute Occasionnel

MichelXld

XLDnaute Barbatruc

Discussions similaires

Privacy & Transparency

Privacy & Transparency