runtime error 1004 pastespecial method of range class failed

[forginganewone]

I keep getting this error "runtime error 1004 pastespecial method of range class failed" on following code :

Option Explicit

Sub copypasterow()
'
' chequerecieving Macro
' copy active row to another workbooks last row
'
' Keyboard Shortcut: Ctrl+l
'
Dim wbTarget As Workbook
Selection.EntireRow.Copy
Set wbTarget = Workbooks.Open("D:\Office\Rental Cheques\Recieving\Recieving File 1\Recieving file 1.xlsx")
wbTarget.Sheets("Sheet1").Range("C1").End(xlDown).Offset(1, 0).PasteSpecial
Application.CutCopyMode = False

End Sub



Please help

 

[Dryver14]

Selection.EntireRow.Copy.....You haven't selected anything

 

[forginganewone]

Selection.EntireRow.Copy.....You haven't selected anything

Doesn't it copy the row a cell is selected of by this ?
If not how can i fix this

 

[Dryver14]

something like activecell.entirerow.select then selection.copy

 

[steve the fish]

You cant copy a whole row and paste it into C1. It wont fit.

 

[steve the fish]

Selection.EntireRow.Copy.....You haven't selected anything

There is always a selection one way or another.

 

[forginganewone]

You cant copy a whole row and paste it into C1. It wont fit.

It Doesn't do that, it just goes at the bottom of C column and pastes the row where blank cell appears in C (mainly the last row)
I

 

[steve the fish]

I suppose you could have a shape or something selected which would produce an error but that would be an obvious mistake. But you need to do something like:

wbTarget.Sheets("Sheet1").Range("C" & Rows.Count).End(xlUp).Offset(1, -2).PasteSpecial xlPasteValues

 

[forginganewone]

something like activecell.entirerow.select then selection.copy

Tried... gives the same error

 

[steve the fish]

It Doesn't do that, it just goes at the bottom of C column and pastes the row where blank cell appears in C (mainly the last row)
I

Yes i know. But if you copy a whole row you have to paste it into column A. You cannot paste it into column C. It wont fit.