Hi All,
I am trying to copy a row "T5" to the end - in this case the row finishes at column "CN" and then paste it into row 3 "T3"
This is what I have so far, I'm not sure how get it to work.
Any help is appreciated.
Thanks
Nat
#Sub CopyVariableData()
Dim LastCol As Integer
'Find last Column
LastCol = Cells(5, Columns.Count).End(xlToLeft).Column
'This hardcode works
Range("T5:CN5").Copy Destination:=Range("T3")
'Trying to use the "LastCol" to make it variable(NOT WORKING error)
Range("T5", Cells(LastCol, "3")).Copy Destination:=Range("T3")
'This doesn't work either
Range("T5" & LastCol).Copy Destination:=Range("t3")
End Sub#
Bookmarks