Pastespecial on excel

[frutuopa]

Hello

I want to copy an excel range, transform it into a picture and paste it into another sheet
on the "CopyPicture" line if I stop the program, I am able to paste into any windows document
but when I try to make the pastespecial i have a error "PasteSpecial method of Range class failed"

can you help me?
Thanks

obs : clffp.daletraExcel(1) returns the excel letter

Dim vnovorange As Excel.Range
vnovorange = xlWorkSheet.Range(clffp.daletraExcel(1) & "5" & ":" & clffp.daletraExcel(5) & "15")
vnovorange.CopyPicture(Excel.XlPictureAppearance.xlScreen, Excel.XlCopyPictureFormat.xlBitmap)
srange = clffp.daletraExcel(1) & "25" ' & ":" & clffp.daletraExcel(5) & "35"
xlWorkSheet2.Range(srange).PasteSpecial(Excel.XlPasteType.xlPasteAll, Excel.XlPasteSpecialOperation.xlPasteSpecialOperationNone, False, False)

 

[JohnH]

Try this:

sheet2.Paste(sheet2.Range("C3"))