find
 

does anyone know of a way to find the last row in an excel worksheet
that does data and set the cursor to the next empty cell


--
joi2
------------------------------------------------------------------------
joi2's Profile: http://www.excelforum.com/member.php...o&userid=27554
View this thread: http://www.excelforum.com/showthread...hreadid=486948

find
 

Try something like the following:

Cells(Rows.Count, "A").End(xlUp)(2, 1).Select


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com

"joi2" wrote
in message
...

does anyone know of a way to find the last row in an excel
worksheet
that does data and set the cursor to the next empty cell


--
joi2
------------------------------------------------------------------------
joi2's Profile:
http://www.excelforum.com/member.php...o&userid=27554
View this thread:
http://www.excelforum.com/showthread...hreadid=486948

find
 

well I'M not sure whats goin to be in the cell so I dont think "A" is
going to work


--
joi2
------------------------------------------------------------------------
joi2's Profile: http://www.excelforum.com/member.php...o&userid=27554
View this thread: http://www.excelforum.com/showthread...hreadid=486948

find
 

An alternative to using the "End" functions, especially if the data area is
not nice and square.

with ws 'ws = Worksheet object
lastrow = .Cells.Find(What:="*", SearchDirection:=xlPrevious, _
SearchOrder:=xlByRows).Row
lastcol = .Cells.Find(What:="*", SearchDirection:=xlPrevious, _
SearchOrder:=xlByColumns).Column
End With

Set LastCell = ws.Cells(lastrow, lastcol)

In my experimentation, this is not as efficient as using the "End" method,
but it does find the very last cell of all "shapes" of data areas.


"joi2" wrote:


well I'M not sure whats goin to be in the cell so I dont think "A" is
going to work


--
joi2
------------------------------------------------------------------------
joi2's Profile: http://www.excelforum.com/member.php...o&userid=27554
View this thread: http://www.excelforum.com/showthread...hreadid=486948