I have the following code working:
Range("A4:BQ50").Copy
Range("A51").PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=True
Rows("4:50").Delete Shift:=xlUp
I was trying to reduce it to the following single line:
Range("A4:BQ50").Copy Destination:=Sheets("Sheet2").Range("A51").PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=True
VBA doesn't like it, it highlights the Paste and the error "Compile Error: Expected end of statement"
Am I doing something wrong or is this not possible?
Thanks.
Range("A4:BQ50").Copy
Range("A51").PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=True
Rows("4:50").Delete Shift:=xlUp
I was trying to reduce it to the following single line:
Range("A4:BQ50").Copy Destination:=Sheets("Sheet2").Range("A51").PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=True
VBA doesn't like it, it highlights the Paste and the error "Compile Error: Expected end of statement"
Am I doing something wrong or is this not possible?
Thanks.