Difficult to comment without seeing your workbook and what you consider to be an entry row.
That said whenever I need to use a database and add new records in a consistent manner the approach I generally use is to create a data entry row above the main table / database range. Then attach a few lines of code to a button that first inserts a new top row to the database, then copies the data entry row to the new blank row and finally clears the entry row ready for the next record.
So for instance with the database column labels in say row 5, and a data entry range say A2:H2 and named "NewRecord" and the database range named with the dynamic range name "Data" defined as
Formula:
=OFFSET($A$5,0,0,COUNTA($A:$A),8)
Sub AddRecord()
Range("Data").Cells(2, 1).EntireRow.Insert
Range("NewRecord").Copy
Range("Data").Cells(2, 1).PasteSpecial (xlPasteValues)
Range("NewRecord").ClearContents
End Sub
Bookmarks