I like to pick out a column that always has data in it if that row is used:

Dim NextRow as long
with worksheets("Sheet999")
Nextrow = .cells(.rows.count,"X").end(xlup).row + 1

.cells(nextrow,"A").value = "Used to be empty!!"

end with



Nigel wrote:

I have a spreadsheet that is being populated by external data. The data is
grouped together by company and between each company there are a couple of
blank lines to allow for the insertion of some code. I am looking for a way
to find the first blank line so I can add the formulas using code and then
once hte formulas are added move onto the next group etc. Can anyone help me
with this

Thanks

--

Dave Peterson