Hi,
This is the code I use for this.
Suppose you are looking for the next available row in column A
A = 1
Do Until Cells(A, 1) = ""
A = A + 1
Loop
When this section finishes, the next available cell: Cells(A, 1)
If your data is contiguous, you can use:
A = WorksheetFunction.CountA(A:A) + 1
Next available cell: Cells(A, 1)
Regards - Dave.
_________________________________________________________________
Looking for a place to manage all your online stuff? Explore the new Windows
Live .
http://www.microsoft.com/australia/windows/windowslive/
--~--~---------~--~----~------------~-------~--~----~
-------------------------------------------------------------------------------------
Some important links for excel users:
1. Excel and VBA Tutorials(Video and Text), Free add-ins downloads at
http://www.excelitems.com
2. Excel tutorials at http://www.excel-macros.blogspot.com
3. Learn VBA Macros at http://www.vbamacros.blogspot.com
4. Excel Tips and Tricks at http://exceldailytip.blogspot.com
To post to this group, send email to excel-macros@googlegroups.com
If you find any spam message in the group, please send an email to:
Ayush Jain @ jainayus...@gmail.com or
Ashish Jain @ 26may.1...@gmail.com
-------------------------------------------------------------------------------------
-~----------~----~----~----~------~----~------~--~---
