historyWks.Cells(lRecRow, 5)
> End If
> End With
> Application.EnableEvents = True
> Application.ScreenUpdating = True
> End If
> End Sub
>
> hope this helps,
>
> Paul
>
>
>
> - Original Message
> > F
Wks.Cells(lRecRow, 5)
End If
End With
Application.EnableEvents = True
Application.ScreenUpdating = True
End If
End Sub
hope this helps,
Paul
- Original Message
> From: JMac
> To: MS EXCEL AND VBA MACROS
> Sent: Tue, November 2, 2010 3:17:
xlLastCell).Row
>
> perhaps before saving you can sort the data so you can get rid of any
> empty rows that are created...
>
> Paul
>
>
>
> - Original Message
> > From: JMac
> > To: MS EXCEL AND VBA MACROS
> > Sent: Tue, November 2, 2010 7:53:25 AM
so you can get rid of any
empty rows that are created...
Paul
- Original Message
> From: JMac
> To: MS EXCEL AND VBA MACROS
> Sent: Tue, November 2, 2010 7:53:25 AM
> Subject: Re: $$Excel-Macros$$ Paste to Next empty Row
>
> I beleive the problem is that if the data in
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 ----
> > F
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
> To: MS EXCEL AND VBA MACROS
> Sent: Mon, November 1, 2010 10:47:34
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 -