Link to home
Start Free TrialLog in
Avatar of Seamus2626
Seamus2626Flag for Ireland

asked on

Copy Chart

Hi,

I am trying to copy a chart from one Sheet to another. Whenever i do, it copys a lot larger than i want, so im looking to resize the chart once pasted.

I was trying to use the below code but everytime i paste the pic, the number changes, next paste it will be ("Chart61") etc etc

So is there a way to resize the chart on paste

 ActiveSheet.Shapes("Chart 60").ScaleHeight 0.62, msoFalse, msoScaleFromTopLeft
    ActiveSheet.Shapes("Chart 60").ScaleWidth 0.77, msoFalse, msoScaleFromTopLeft

Thanks
Seamus

Private Sub CommandButton8_Click()

Call deletePic
Sheets("Cash Chart").Visible = True
Sheets("Cash Chart").Select

    
    ActiveWindow.ActiveChart.CopyPicture
    Sheets("Cash Chart").Visible = False
    Sheets("Screen").Select
    Range("C14").Select
    ActiveSheet.Paste
    
    
End Sub

Open in new window

ASKER CERTIFIED SOLUTION
Avatar of jppinto
jppinto
Flag of Portugal image
Link to home
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Start Free Trial
Avatar of Seamus2626
Seamus2626
Flag of Ireland image

ASKER

Hey Jppinto, there both at 100%...


Thanks
Seamus