S
samuel.dogbatse
Hello i am trying to copy a chart to a user form using :
Private Sub cmdagecharts_Click()
Dim chtchart As Chart
Dim image
Set chtchart = Sheet9.ChartObjects(1).Chart
image = chtchart.CopyPicture(xlScreen, xlPicture)
Set imgchtpic1.Picture = pastePicture(image)
End Sub
each time i run it this bit of code i get the error message Expected
Function or Variable
Your help is despirately needed
Many thanks
Private Sub cmdagecharts_Click()
Dim chtchart As Chart
Dim image
Set chtchart = Sheet9.ChartObjects(1).Chart
image = chtchart.CopyPicture(xlScreen, xlPicture)
Set imgchtpic1.Picture = pastePicture(image)
End Sub
each time i run it this bit of code i get the error message Expected
Function or Variable
Your help is despirately needed
Many thanks