@חנון-המרבה
זה אפשרי לשנות בקוד ככה:
set value=Me("ComboBox" & x).Text
ודוגמא:
Private Sub UserForm_Initialize()
Dim i As Integer
For i = 1 To 3
Me("ComboBox" & i).Text = i
Next
End Sub
דרך נוספת שבה אני משתמש לפעמים (בגלל מגבלת הVBA שלא לייצר פקדים בזמן ריצה. ב"ה בעולם הדוטנט לא מגיעים לשם....), זה לשים פרמטר מסויים במאפיין Tag ולרוץ על כלל הפקדים בטופס (זה תלוי לאן המקרה שלך הולך. בדוגמא שהבאת ייתכן שיותר נכון להשתמש במספר רציף)
לדוגמא:
For Each c In Me.Controls
If c.Tag = "order" Then
End If
Next
