Question Excel 2007 CopyPicture PasteSpecial with formulas

[cwteoh]

Dear all experts,
I am convert so VB6 code with Excel 2003 to VB.Net 2008 with Excel 2007.

From VB6, I see this
set FromRange = xlsheetNew.Range("$B$1:$B$2")
FromRange.CopyPicture

Set ToRange =xlsheetNew.Range("$A$1:$A$2")
ToRange.PasteSpecial
xlsheetNew.Application.Selection.Formula = FromRange.Address


How should make it work in Excel 2007 in VB.Net?
I tried this and not working...
Dim FromRange = xlsheetNew.Range("$B$1:$B$2")
FromRange.CopyPicture

Dim ToRange =xlsheetNew.Range("$A$1:$A$2")
ToRange.PasteSpecial(Excel.XlPasteType.xlPasteAll, xlPasteSpecialOperationNone,False, False)


Can anyone help?