Ik heb een userform waarin de comboboxen gevuld worden uit een blad "grondstoffen"
Deze word nu gevuld op volgorde zoals het erin gezet is.
Kun je deze lijst ook zo krijgen dat het op alfabetische volgorde komt te staan ?
Zodat als je begint met de letter M je alles krijgt met de letter M enz.
Hoe krijg ik dat voor elkaar ?
Deze word nu gevuld op volgorde zoals het erin gezet is.
Kun je deze lijst ook zo krijgen dat het op alfabetische volgorde komt te staan ?
Zodat als je begint met de letter M je alles krijgt met de letter M enz.
Hoe krijg ik dat voor elkaar ?
Code:
Private Sub Userform_Initialize()
ComboBox1.List = Sheets("data").Columns(1).SpecialCells(2).Offset(1).SpecialCells(2).Value
For i = 2 To 28 Step 2
Me("Combobox" & i).List = Sheets("data").Columns(3).SpecialCells(2).Offset(1).SpecialCells(2).Value
Next
For i = 3 To 29 Step 2
Me("Combobox" & i).List = Sheets("Grondstoffen").Columns(4).SpecialCells(2).Offset(1).SpecialCells(2).Value
''.Sort Cells(1, 20)
Next
End Sub