PDA

View Full Version : Finding Last Empty Cell



jsauriol
01-29-2008, 11:15 AM
Here is my problem:

I have data that updates every couple of days and I have designed a macro to take care of the data, but i need to log it in a worksheet. The worksheet gets filled out everytime this report is done. I need to find the first empty row in the log so that the new information can be placed there. And so on for the next time.

The cells that I need this to look in are B74:B550. From there if the first empty cell is found i can fill out the rest of the row.

Bob Phillips
01-29-2008, 11:35 AM
With Workbooks("Log.xls").Worksheets(1)
Set NextFreeCell = .Range("A1").End(xlDown)
End With

jsauriol
01-29-2008, 11:37 AM
you always make is so simple. Thanks again for saving the day!

Bob Phillips
01-29-2008, 11:41 AM
It would help if I got it right



With Workbooks("Log.xls").Worksheets(1)
Set NextFreeCell = .Range("A1").End(xlDown).Offset(1,0)
End With