SOLVED

How to paste till last row using Macro

Highlighted
Contributor

Hello Team,

 

I have two columns "System" and "CC". I need to past dolphin after the last row till i have values in "CC".

How do i code this. when i record i am getting a range but range always changes. Need help

 

Attached Macro File.

 

Regards,

Chandrakanth.K

1 Reply
Highlighted
Solution

 

How about the below?     Cells(Rows.Count, 2).End(xlUp).Row     finds the last used row in Column 2. 

 

 

Sub FillDolphin()

Dim lRow As Long

lRow = Cells(Rows.Count, 2).End(xlUp).Row

Range("A4:A" & lRow).Formula = "Dolphin"

End Sub