how to find the end of records of an excel sheet like finding the end of
a text file with the command EOF


--
JOLLYNEELI
------------------------------------------------------------------------
JOLLYNEELI's Profile: http://www.excelforum.com/member.php...o&userid=26782
View this thread: http://www.excelforum.com/showthread...hreadid=400375

See iLastrow in thread "Delete rows" upwards!

Regards,
Stefi

€žJOLLYNEELI€� ezt Ã*rta:


how to find the end of records of an excel sheet like finding the end of
a text file with the command EOF


--
JOLLYNEELI
------------------------------------------------------------------------
JOLLYNEELI's Profile: http://www.excelforum.com/member.php...o&userid=26782
View this thread: http://www.excelforum.com/showthread...hreadid=400375

Assuming your data is in column A, use

Dim LastRow As Long
LastRow = ActiveSheet.Cells(Rows.Count,"A").End(xlUp).Row


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


"JOLLYNEELI"
wrote
in message
...

how to find the end of records of an excel sheet like finding
the end of
a text file with the command EOF


--
JOLLYNEELI
------------------------------------------------------------------------
JOLLYNEELI's Profile:
http://www.excelforum.com/member.php...o&userid=26782
View this thread:
http://www.excelforum.com/showthread...hreadid=400375

Can you pick out a column that always has data?

if yes:

dim LastRow as long

with worksheets("sheet1")
lastrow = .cells(.rows.count,"E").end(xlup).row
end with

(I used column E.)

JOLLYNEELI wrote:

how to find the end of records of an excel sheet like finding the end of
a text file with the command EOF

--
JOLLYNEELI
------------------------------------------------------------------------
JOLLYNEELI's Profile: http://www.excelforum.com/member.php...o&userid=26782
View this thread: http://www.excelforum.com/showthread...hreadid=400375

--

Dave Peterson