Copy and PasteSpecial help
Try this one.
Option Explicit
Public Sub PasteSpecial()
Dim ws As String
Dim from As Range
Dim destination As Range
ws = "DW"
With Worksheets(ws)
Set from = .Range("A2:A5")
Set destination = .Range("B2")
Call from.Copy
Call destination.PasteSpecial(xlPasteValues)
End With
End Sub
--
Carlos
"chemicals" wrote:
I have simple code:
Sheets("DW").Range("C15:BK15").Copy
Sheets("DW").Range("C11").PasteSpecial(xlValues)
I get the follwoing error:
Error 1004
Unable to get the PasteSpecial property of the Range class
What gives?
|