Macro for moving a chart

[bfraser]

I want to add a cell w/shape and a macro assigned, that will move a chart from one ws to another. I tried recording the macro but that only works once then.... errors.

 

[Hui]

It could be as simple as

[pre]

Sub Move_Chart()
ActiveChart.Parent.Cut
Sheets("Sheet2").Select
ActiveSheet.Paste
End Sub

[/pre]
You have to have a chart selected on the active sheet

Then run the code


Why not post your code so we can advise?

 

[bfraser]

ub MoveChart14()

'

' MoveChart14 Macro

'


'

Sheets("Comp %").Select

ActiveSheet.ChartObjects("Chart 14").Activate

ActiveChart.PlotArea.Select

ActiveChart.Location Where:=xlLocationAsObject, Name:="CONV SCHEDULE"

End Sub

 

[bfraser]

Sheets("Comp %").ChartObjects("Chart 7").Activate

ActiveChart.ChartArea.Copy

Sheets("CONV SCHEDULE").Select

Range("C7").Select

Sheets("CONV SCHEDULE").Paste

End Sub

This works for copying and pasting "Chart 7" to ws "CONV SCHEDULE". Working on cut the pasted chart next.