Range

[Orleans]

I download data that has a different number of lines each download, but all are between 70,000 and 100,000 lines. I insert a column (C) then add (A)+(B) with the sum in the new column (C). My macro handles this well, but I then need to copy the new formula in (C) to the rest of the lines in column (C). Since each spreadsheet has a different number of lines, I can't figure out what to do in my macro stop copying the formula at the last line.

 

[HalfAce]

Hi and welcome to the board.

Here's how you can determine the last used row in a column. (In this case column A.)

Sub Demo()
Dim LstRw As Long
LstRw = Cells(Rows.Count, "A").End(xlUp).Row
MsgBox "The last row in column A with data in it is row " & LstRw
End Sub

Does that help?

 

[VoG]

Try

Sub Cpy()
Dim LR As Long
LR = Range("A" & Rows.Count).End(xlUp).Row
Range("C1:C" & LR).Formula = "=A1+B1"
End Sub

 

[Orleans]

Thank you very much. That is outstanding.