DLS

The way to start over is to delete the entries that are there. You can do
that in a separate macro like

Sub DelEntries()

Range("A20",Range("A20").End(xlDown)).Resize(,10). ClearContents

End Sub

If there are specific time that you always want to start over, like when you
open the workbook, you could call this sub from the Workbook_Open event to
automate the process even further.

--
Dick Kusleika
MVP - Excel
www.dicks-clicks.com
Post all replies to the newsgroup.

<DLS wrote in message ...
Dick, the coding works great and starts over on the next line after 10
entries. I noticed that if I close the workbook and later reopen it that
it starts where it left off the last time. Is there a way I can reset
everything when I need to start the entries anew from the beginning?
Thanks for your help.
DLS

*** Sent via Developersdex http://www.developersdex.com ***
Don't just participate in USENET...get rewarded for it!