Microsoft KB Archive/41489

From BetaArchive Wiki
The printable version is no longer supported and may have rendering errors. Please update your browser bookmarks and please use the default browser print function instead.

Finding End of Rows and Columns in Excel Using XLM Code





The information in this article applies to:


  • Microsoft Excel for Windows, version 2.x, 3.0, 4.0, 4.0a, 5.0



SUMMARY

To select a range of information that contains a variable range of data, you can write a Microsoft Excel macro to select from the starting cell to the end of data, or until a blank cell is found.


MORE INFORMATION

The following macro sets the first cell (the upper left corner) to "start", searches across the row until it finds a blank cell, backs up one cell, searches down the column until it finds a blank cell, backs up one cell, names that cell (the lower right corner) "stop", and selects the range "start:stop." (Note that the names "start" and "stop" are arbitrary. You can use any name that denotes the upper left corner and the lower right corner.)


Macro                      Comments
-----                      --------

=DEFINE.NAME("start")      Names the upper left cell
=WHILE(ACTIVE.CELL()<>"")  Tests for active cell to be blank
=SELECT("rc[1]")           Selects the next column to right
=NEXT()                    Loops if not blank
=SELECT("rc[-1]")          If blank, backs up one cell
=WHILE(ACTIVE.CELL()<>"")  Tests for active cell to be blank
=SELECT("r[1]c")           Selects the next row down
=NEXT()                    Loops if not blank
=SELECT("r[-1]c")          If blank, backs up one cell
=DEFINE.NAME("stop")       Names the cell "stop"
=SELECT("start:stop")      Selects range
=RETURN() 




Additional query words:

Keywords :
Version :
Platform :
Issue type :
Technology :


Last Reviewed: March 12, 1999
© 2000 Microsoft Corporation. All rights reserved. Terms of Use.