Excel VBA: Schleife durch die Elemente eines Kombinationsfelds von einem anderen Benutzerformular

Question

Ich möchte die Elemente einer Kombinationsfeld-Schleife durchlaufen, aber nicht ihre Werte abrufen. Ich möchte nur durchgehen, wie viele Elemente es gibt. Hier ist, wie ich Objekte hinzufügen.

Private Sub UserForm_Initialize() 

    Chapter.AddItem "Chapter 1" 
    Chapter.AddItem "Chapter 2" 
    Chapter.AddItem "Chapter 3" 
    Chapter.AddItem "No　Chapter" 

End Sub 

Und das ist es, was ich versucht habe, es durchlaufen.

 Dim itm As Object 

     For Each itm In UserForm.ComboBox1.Items.Count 

     Next 

Aber Fehleraufforderung; Kompilierfehler: Methode oder Datenelement nicht gefunden

Ist es wichtig, dass diese Codes nicht auf einem Benutzerformular sind? Ich habe zwei Benutzerformulare und das Hinzufügen von Elementen zum Kombinationsfeld ist auf dem zweiten und das Durchlaufen des Kombinationsfelds ist auf dem ersten. Spielt das eine Rolle?

Answer 1

Wenn Sie nur für Objekte Schleife wollen zählen, können Sie

Dim itm As Object 

    For i = 1 to UserForm1.Chapter.ListCount 

    Next 

versuchen Wo Userform1 der Name des Formulars, das enthält Combobox und ist der Name der ComboBox

Answer 2

Versuchen Sie dies (ohne Erklärung als Objekt):

For Each itm In ComboBox1.List 
'for example display in messagebox 
MsgBox itm 

Next