Déplacer graphique

[Sang1]

Bonjour,

Je souhaite déplacer un graphique grace a une macro afin de le placer ou je souhaite sur la page, car je vais avoir beaucoup de graphique sur une meme page ... donc une mise en page s'impose.

Merci d'avance

SANG1

 

[Sang1]

Re : Déplacer graphique

Pas d'idées ?? Je n'y arrive toujours pas, meme en cherchant sur le fofo...

 

[ve-]

Re : Déplacer graphique

Bonjour Sang1,

Mois aussi je travaille beaucoup sur els macros sur les graphiques.
Donc à mon avis, il faut déjà que tu le nommes :
tu te positionnes dessus et en même temps, tu cliques droit. En haut à gauche de ton écran, tu le renommes (exemple : GRAF1)

Mettons que tu veuilles le pacer dans la cellule B5

Dans ta macro,

Workbooks("xxx.xls").Sheets("xxx").Activate
ActiveSheet.ChartObjects("GRAF1").Activate
ActiveChart.ChartArea.Select
ActiveChart.ChartArea.Copy
Range("b5").Select
ActiveSheet.Paste

Essaie... Tu me diras

 

[Catrice]

Re : Déplacer graphique

Bonjour,

Tu peux essayer ceci :

Sub test()
With ActiveSheet.ChartObjects("Graphique 1")
.Left = 100
.Top = 100
End With
End Sub

Mais il faudrait fournir plus d'informations...

 

[Pierrot93]

Re : Déplacer graphique

Bonsoir,

une autre solution pour "coller" à une cellule :

https://www.excel-downloads.com/threads/bug-macro-deplacement-graphique.121938/

bonne soirée
@+