MrExcel Publishing
Your One Stop for Excel Tips & Solutions

cut/paste a chart with a Macro?

Posted by Ted on May 02, 2000 10:14 AM

When trying to cut a chart and then paste it in a different location on the same
work sheet with a macro I get a Error."Unable to get ChartObjects property of
the worksheet class".
This is the macro I tried to use but got an error "Unable to get ChartObjects
property of the worksheet class".I ran debug ( it pointed to the part I
marked***).Thanks for any help.

Sub Macro1()
' Macro1 Macro
' Macro recorded 5/1/2000 by

ActiveSheet.ChartObjects("Chart 1").Activate
ActiveWindow.Visible = False
ActiveWindow.WindowState = xlNormal
ActiveWindow.WindowState = xlMaximized
*** ActiveSheet.ChartObjects("Chart 2").Activate ***
End Sub

Posted by Celia on May 03, 2000 4:56 AM

Macro1 Macro Macro recorded 5/1/2000 by

I must admit to having no experience with charts but it would seem that if you just want to relocate your chart to cell F2 you should be using code to relocate rather than cut and paste.

The following should work :-

Sub RelocateChart()
ActiveSheet.Shapes("Chart 1").Left = Range("F2").Left
ActiveSheet.Shapes("Chart 1").Top = Range("F2").Top
End Sub