Question : Fill Combo Box Method

Hi All,

I am developing a very simple form based Excel application with no cell referencing at all.

I have a combo box on a user form named DaysOfSupply that needs to display the values 1 - 100. i.e. 1, 2, 3, 4 and so forth.

Does anyone know a quick way to that I can populate it with the 100 values without using the  .additem method for each of the 100 values.

I want to do this on the form initialise event.

Thanks in advance.

CF

Answer : Fill Combo Box Method

If you want to loop instead, then you can use the code you posted in the Initialize sub, but you don't want x + 1, you want x:


1:
2:
3:
4:
5:
6:
7:
8:

Private Sub UserForm_Initialize()
    Dim x as long
    With Me.DaysOfSupply
      For x = 1 To 100
        .AddItem x
      Next x
    End With
End Sub
Random Solutions  
 
programming4us programming4us