Bonjour,
Ma macro de déplacement de graphique bug et je ne comprend pas pourquoi...
La choses bizar c'est que sa fonctionne quand j'ai un "copy" a la place du "cut", mais avec le copy je me retrouve avec 2 graphique sur la meme page donc sa ne va pas. J'ai besoin de votre aide !!!
Public Sub a()
Workbooks("ex.xls").Sheets("Sheet1").Activate
ActiveSheet.ChartObjects("aaa").Activate
ActiveChart.ChartArea.Select
ActiveChart.ChartArea.Cut
Range("A1").Select
ActiveSheet.Paste
End Sub
Merci d avance pour votre aide
SANG1
Ma macro de déplacement de graphique bug et je ne comprend pas pourquoi...
La choses bizar c'est que sa fonctionne quand j'ai un "copy" a la place du "cut", mais avec le copy je me retrouve avec 2 graphique sur la meme page donc sa ne va pas. J'ai besoin de votre aide !!!
Public Sub a()
Workbooks("ex.xls").Sheets("Sheet1").Activate
ActiveSheet.ChartObjects("aaa").Activate
ActiveChart.ChartArea.Select
ActiveChart.ChartArea.Cut
Range("A1").Select
ActiveSheet.Paste
End Sub
Merci d avance pour votre aide
SANG1