Can't send data from form to spreadsheet.

C

Clark Kent

I created a form using a sheet in a workbook but can't get the data to the
database spreadsheet. Is there an easier way than creating a macro and
assigning it to a button? I tried this but Visual Basic isn't my specialty. I
also need the data to go at the end of the spreadsheet and I can't figure out
how to tell the macro to find the end. Any help is appreciated.
 
M

M. Authement

To find the "end" of the spreadshet (assuming you mean the next blank row)
try something like this:

Dim rNextBlank As Range

Set rNextBlank =
Worksheets("YourSheetNameHere").Range("A65536).End(xlup).Offset(1,0)
 
Top