Erstellen Sie ein ComboBox-Objekt, um es in einen Sub

Question

Ich versuche, auf eine ComboBox auf einem UserForm von einem Sub zuzugreifen. Daher versuche ich ein Combobox-Objekt hinein zu geben.

Allerdings scheint es mir nicht möglich, ein Combobox-Objekt zu erstellen, um es zu übergeben. Sie sind immer leer, wenn Sie das Sub eingeben. Das ist, was ich habe versucht:

Dim ctl As ComboBox 

Set ctl = Me.cb_FcnName 'cb_FcnName is the name of the Combobox I'm trying to access 

Call ColumnEntries2Combobox(ctl) 

Und das ist mein Sub:

Private Sub ColumnEntries2Combobox(ByRef Combo As ComboBox) 
    Combo.AddItem = Worksheets(WorksheetName).Cells(currRow, 2) 
End Sub 

Aus irgendeinem Grund kann ich nicht auf alle Unterlagen zu finden scheinen, wie die erforderliche Combobox Objekt erstellen Pass in die Sub ...

Vielen Dank im Voraus für jede Art von Hilfe!

Answer 1

AddItem ist eine Methode, keine Eigenschaft. Bei einer Methode liefern wir Argumente nach einem Leerzeichen, im Vergleich zu einer Eigenschaft, die gleich ist.

So

 Combo.AddItem = Worksheets(WorksheetName).Cells(currRow, 2) 

zu

 Combo.AddItem Worksheets(WorksheetName).Cells(currRow, 2) 

ändern Dies ist ein häufiger Fehler, so dass eine einfache Demonstration ist:

object.Property = value 

object.Method arg1, arg2