Hi everyone:

I apologize for repeating this question again but I'm desperate for a solution and am at a loss.

I have setup a vehicle inventory database list with 30 columns or fields. The info for each vehicle is entered by clicking a button that opens a data form to enter all info for each individual vehicle/record.

I've been able to enter 32 vehicles/rows successfully. For the 33rd vehicle, when I click the button and the data form opens, I click "new" as usual but when I try to enter the next vehicle, it won't let me enter any info in the any fields. Excel gives me the message "Cannot extend list or database". It should allow me to enter as many records as there are available rows on the worksheet, shouldn't it?

Can anyone PLEASE help me with this problem?

PS if this helps.....
I use a button with the following macro to open the form so that it will unprotect the sheet for the user to enter the data and protect it again upon closing the form to protect some formulas from inadvertantly being lost by the user.


Sub DataEntry()
'
' DataEntry Macro
' Macro recorded 11/25/2004 by Jean
'

ActiveSheet.Unprotect Password:="xxxx"
ActiveSheet.ShowDataForm
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True _
, AllowFiltering:=True, Password:="xxxx"
ActiveSheet.EnableSelection = xlUnlockedCells
End Sub

Thank you in advance,
Jean