Sub SelectFirstEmptyRow()
Dim r As Long
r = Application.WorksheetFunction.CountA(Range("A:A"))
Cells(r, 1).Select
End Sub



_________________________________________________________________________________________________
"There are known knowns. These are things we know that we know. There are known 
unknowns. That is to say, there are things that we know we don't know. But 
there are also unknown unknowns. There are things we don't know we don't know." 




________________________________
From: Jesper <jesperjesper...@gmail.com>
To: MS EXCEL AND VBA MACROS <excel-macros@googlegroups.com>
Cc: jesperjesper...@gmail.com
Sent: Monday, 4 May, 2009 12:52:14 PM
Subject: $$Excel-Macros$$ Find the first empty row


Hi all

I have a little problem with this VBA thing..... I need to make a
macro that can find the first empty row and paste the content of the
clipboard in that row from col A

col H allways have data so that one would be a good col to use to find
the first empty cell

If more info is needed just ask
I am new to this so I don't know what information is needed for any
one to help me out

Thanks in advance

Jesper



      Own a website.Get an unlimited package.Pay next to nothing.*Go to 
http://in.business.yahoo.com/
--~--~---------~--~----~------------~-------~--~----~
-------------------------------------------------------------------------------------
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
-------------------------------------------------------------------------------------
-~----------~----~----~----~------~----~------~--~---

Reply via email to