The idea of a button will work and there are lots of people around here who
can help you. The code to do it however is not terribly easy and probably not
a great project for a beginner. If you are interested in proceeding the repy
back with a few more details. A couple of things we will need to know are
what type of database you are writting to and whether Referential Integrity
is enforced on the table.

Signature
HTH...
Jim Thomlinson
> Folks
>
[quoted text clipped - 13 lines]
>
> ,
Don Guillett - 10 Aug 2007 22:57 GMT
something like this
Sub copydaysdata()
slr = Cells(Rows.Count, "a").End(xlUp).Row
dlr = Sheets("sheet2").Cells(Rows.Count, "a").End(xlUp).Row + 1
Range("a2:x" & slr).Copy _
Sheets("sheet2").Range("a" & dlr)
End Sub

Signature
Don Guillett
Microsoft MVP Excel
SalesAid Software
dguillett1@austin.rr.com
> The idea of a button will work and there are lots of people around here
> who
[quoted text clipped - 25 lines]
>>
>> ,