Range of numbers for combo-box without using a table?

[Michael R]

Hi.

I'm currently dealing with the following:

I need a drop box that will have in it a certain range of accending consuquential numbers for ex: 1, 2, 3, 4, 5, 6, 7. The min and the max number (the range) can be determined by user.

The only way I know of how to do it, is creating a VBA loop with the count of the range of numbers needed and appending each instance of the loop a record to a table, and in this way creating a table with sequentiqal numbers, then using the table as a row source of the query. Is there any other, simplier way?

Thanks in advance, Michael.

[Rabbit]

A row source can be built using just the values:

"Value 1"; "Value 2"; "Value 3"

[Michael R]

A row source can be built using just the values:

"Value 1"; "Value 2"; "Value 3"

Nope, doesn't work. It says values specified on this form does not exist.

[MMcCarthy]

Nope, doesn't work. It says values specified on this form does not exist.

You need to change the rowsourcetype to "Value List".

Mary

[ADezii]

Hi.

I'm currently dealing with the following:

I need a drop box that will have in it a certain range of accending consuquential numbers for ex: 1, 2, 3, 4, 5, 6, 7. The min and the max number (the range) can be determined by user.

The only way I know of how to do it, is creating a VBA loop with the count of the range of numbers needed and appending each instance of the loop a record to a table, and in this way creating a table with sequentiqal numbers, then using the table as a row source of the query. Is there any other, simplier way?

Thanks in advance, Michael.

As long as you are not running an earlier Version of Access:

Dim lngMin As Long, lngMax As Long, intCounter As Integer
 
lngMin = 2000        'retrieve value in any manner
lngMax = 2150        'retrieve value in any manner
 
Me![cboTest].RowSourceType = "Value List"
 
For intCounter = lngMin To lngMax
  Me![cboTest].AddItem intCounter
Next