Jeff,

There are lots of ways of finding the "next" empty row.
In your case, is it possible that column "A" does not always have a value?
also... lLastRec = lastRow - 1 will give you the PREVIOUS row instead of the 
NEXT row...
Perhaps that's what is causing the problem.
Wouldn't you use:

lLastRec - lastRow + 1 

??



What I have often used is:

LastRow = ActiveCell.SpecialCells(xlLastCell).Row

Now, if during the execution of your macro, you're removing rows,
then this method won't always work accurately.
Let's say you have 10 rows of data.
the above line will return 10.
Now delete 5 rows.
It will STILL Return 10.
until you exit the file and re-open it.
THEN it will return 5...

Still... 

hope this helps,

Paul

----- Original Message ----
> From: JMac <jsvi...@gmail.com>
> To: MS EXCEL AND VBA MACROS <excel-macros@googlegroups.com>
> Sent: Mon, November 1, 2010 10:47:34 AM
> Subject: $$Excel-Macros$$ Paste to Next empty Row
> 
> I've got a workbook in which a user inputs values into cells on sheet
> 1, and then the info is copied to a log sheet. I'm using the following
> code to find the next empty row in the log sheet to paste the info:
> 
> With historyWks
>           lastRow = .Cells(.Rows.Count, "A").End(xlUp).Offset(1,
> 0).Row - 1
>           lLastRec = lastRow - 1
>       End With
> 
> From time to time, I'm told that an existing entry has been
> overwritten with new data.
> 
> Should I be using something different to find the next empty row ?
> 
> Thanks
> 
> Jeff
> 
> -- 
>----------------------------------------------------------------------------------
>-
> Some important links for excel users:
> 1. Follow us on TWITTER for tips tricks and links : 
>http://twitter.com/exceldailytip
> 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
> 3. Excel tutorials at http://www.excel-macros.blogspot.com
> 4. Learn VBA Macros at http://www.quickvba.blogspot.com
> 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
> 
> To post to this group, send email to excel-macros@googlegroups.com
> 
> <><><><><><><><><><><><><><><><><><><><><><>
> Like our page on facebook , Just follow below link
> http://www.facebook.com/pages/discussexcelcom/160307843985936?v=wall&ref=ts
> 

-- 
----------------------------------------------------------------------------------
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links : 
http://twitter.com/exceldailytip
2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
3. Excel tutorials at http://www.excel-macros.blogspot.com
4. Learn VBA Macros at http://www.quickvba.blogspot.com
5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
 
To post to this group, send email to excel-macros@googlegroups.com

<><><><><><><><><><><><><><><><><><><><><><>
Like our page on facebook , Just follow below link
http://www.facebook.com/pages/discussexcelcom/160307843985936?v=wall&ref=ts

Reply via email to