Assigning numbers to certain fields

[smartflashes]

Dear friends,
I need help with the attached form. I need to automatically distribute numbers to certain group of fields according to the selection of the user. i.e. on opening the form, the user is asked to enter the first number of the group and then the last number of the group. Numbers of the group will appear and a textbox to write a beginning number to start with to assign a group of numbers to that group. A button to start the procession and another button to re-open the for to continue assigning other groups.

[June7]

Need to use an UPDATE query. I use only VBA, no macros.

1. Don't use input parameter prompts in query. Use textboxes on the form for user input.

2. The criteria in the query will refer to the textboxes for input. The form should open without prompting for inputs.
[Forms]![secret]![Start] And [Forms]![secret]![End]));

3. VBA code in the Distribute button click:
CurrentDb.Execute "UPDATE Table1 SET secret=" & Me.c1 & " WHERE seat BETWEEN " & Me.Start & " AND " & Me.End
Me.Requery

[smartflashes]

Thanks, June, but this is what I don't exactly want.
Attached is a picture that may illustrate what I want.

[June7]

Why should the form open with prompts? If they want to change the inputs will have to close form and reopen to get the prompts again. Or maybe execute the Me.Requery line after the UPDATE sql will trigger the prompts again.

Why not open form with blank fields and users input there?

Whichever way, the UPDATE is still needed.

[smartflashes]

Why should the form open with prompts? If they want to change the inputs will have to close form and reopen to get the prompts again. Or maybe execute the Me.Requery line after the UPDATE sql will trigger the prompts again.

Why not open form with blank fields and users input there?

Whichever way, the UPDATE is still needed.

It's Ok. I changed the design as you suggested. No need to open the form with prompt. I just want to distribute a series of numbers to certain fields as illustrated in the picture. The user will input numbers for Start and End and will input a number to begin distributing with. On clicking the button, the process starts as appears in the picture. What you didn't get was that I wanted a series of numbers, and not the same number, to be assigned to the group. I wish you get what I want to do. Thanks.

[June7]

Oh, see that now, had to blow up the image for my eyes - LOL! Then something like:

Dim i As Integer
If Not IsNull(Me.End) And Not IsNull(Me.Start) And Me.End > Me. Start Then
For i = 1 to Me.End - Me.Start
CurrentDb.Execute "UPDATE Table1 SET secret=" & Me.c1 + i -1 & " WHERE seat = " & Me.Start + i - 1
Next
Me.Requery
End If

[smartflashes]

Thanks, June.
Everything works well now.