G
Guest
I have a bunch of comboboxes i would like to set the values to before my form
loads based on how big a range is but i want to be able to run through all
combo boxes with having to write a block for each ...... using some code i
seen in a book i wrote this and thought that this might work ...
any suggestions
Dim mycontrol As Control
Load ISBN
For Each mycontrol In Controls
If Left(mycontrol.Name, 5) = "Combo" Then
For Fill = 0 To a - 1
With mycontrol
Dim nextitem As Integer
nextitem = 65 + Fill
.AddItem Chr(nextitem)
End With
Next Fill
End If
Next
ISBN.Show
loads based on how big a range is but i want to be able to run through all
combo boxes with having to write a block for each ...... using some code i
seen in a book i wrote this and thought that this might work ...
any suggestions
Dim mycontrol As Control
Load ISBN
For Each mycontrol In Controls
If Left(mycontrol.Name, 5) = "Combo" Then
For Fill = 0 To a - 1
With mycontrol
Dim nextitem As Integer
nextitem = 65 + Fill
.AddItem Chr(nextitem)
End With
Next Fill
End If
Next
ISBN.Show