#1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 1
Default 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

  #2   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 7,247
Default 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



  #3   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 1
Default 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

  #4   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 45
Default 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


Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Find First Non blank cell than find column header and return that value Silver Rose Excel Worksheet Functions 10 April 30th 07 05:56 PM
Despite data existing in Excel 2002 spreadsheet Find doesn't find AnnieB Excel Discussion (Misc queries) 1 June 16th 06 02:15 AM
find and delete duplicate entries in two columns or find and prin. campare 2 columns of numbers-find unique Excel Programming 1 November 24th 04 04:09 PM
find and delete text, find a 10-digit number and put it in a textbox Paul Excel Programming 3 November 16th 04 04:21 PM
backwards find function to find character in a string of text Ashleigh K. Excel Programming 1 January 14th 04 04:36 PM


All times are GMT +1. The time now is 07:11 AM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright ©2004-2024 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"