Database

[Guest]

Folks


I have a small excel spreadsheet which I use for data entry at the end of
each day.
Rather than discard the previous day's data, I want to append this data to a
database.

* What is the quickest or easiest method to accomplish this goal ?

One possibility is to be able to press a button (connected to the
appropriate code) to manually transfer the data in the spreadsheet to the
database.



Thanks,
JoJo.








,

 

[Guest]

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.

 

[Don Guillett]

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