VBA .Paste Methods

[Captain_Conman]

Frequently when I write code such as the following...

Sheets("Sheet2").Range("A2").Paste

I get runtime error 438 "object doesn't support this property or method"

I usually just change it to .PasteSpecial or try another way of pasting and work it out. However, I have never understood why this happens.

Could someone give me some clarification on .Paste methods? What am I not understanding?

Full code if needed...

Sub Macro1()


Dim c As Range


For Each c In Range("A:A")
If c.Text = c.Offset(1, 0).Text Then
    If c.Offset(0, 2).Value = c.Offset(1, 2).Value * -1 Then
    Rows(c.Row & ":" & c.Row + 1).Cut
        If Sheets("Sheet2").Range("A2") = "" Then
        Sheets("Sheet2").Range("A2").Paste
    Else
        Sheets("Sheet2").Range("A1").End(xlDown).Offset(1, 0).Paste
        End If
    Else
    End If
    End If
    Next
    
End Sub

 

[tonyyy]

Captain_Conman,

In the Excel Object Model, a Worksheet object supports both the .Paste and .PasteSpecial methods; a Range object only supports the .PasteSpecial method.

You could re-write the offending line of code to...

Sheets("Sheet2").Paste Destination:=Range("A2")

Cheers,

tonyyy