Hello everyone,

I´m trying to set variable with index, but kinda dunno how and its not working the way I´m trying so, if anyone has an idea how to do it, would be awesome if you could share. My code goes like this:

Public style As String
Public u As Long
Public choise As String
Public order As Long


Private Sub order_cmd_1_Click()

Dim form As String
Dim s As Control
   
For Each s In Me.Controls
    If TypeName(s) = "OptionButton" Then
        If s = True Then
            form = s.Caption
        End If
    End If
Next s

For u = 0 To frm_selection.selection_lbx_1.ListCount - 1
    If frm_selection.selection_lbx_1.Selected(u) Then
        choise(u) = frm_selection.selection_lbx_1.List(u)
        order(u) = frm_order.order_cbx_1.Value
        style(u) = form
    End If
Next u

End Sub
and i need choise, order and style to be indexed due to user´s choise, because than there will be more code running dependant on the number of user´s choise....

to give you more idea what I´m trying to do is, lets say user chooses 4 items, than, he decides the format and order for the 1st choise and therefore i need that choise to be saved to variable with index 1 (because it was the first one) than he skips lets say 2nd and goes straight for 3rd and thefore those variables has to have index 3 and if he realizes and goes to 2nd it goes with 2....etc. i think at this moment u should have the idea what im trying to do here.

this one should be the last issue within my app, than i think i´ll be able to finalize it and hand it over....:-D

Best regards

Soul