Passing eine Sammlung an eine Funktion in Visual Basic für Applikationen (VBA) ist sehr ähnlich zu anderen vorbei variable Datentypen. Eine Sammlung ist ein Objekt, das für die Gruppierung ähnlicher Objekte oder Elemente verwendet wird. Sie müssen die Parameter in der Funktion zu definieren als "Objekt" , um eine Sammlung erfolgreich an die Funktion übergeben . Sobald die Sammlung ist in Ihrer Funktion , können Sie die Sammlung von Daten unter Verwendung der "Items" -Eigenschaft zugreifen . Anleitung
1

Starten Sie Microsoft Excel , klicken Sie auf die Registerkarte "Entwicklertools" und klicken Sie auf " Visual Basic ", um den VBA-Editor zu starten. Klicken Sie auf das Menü "Einfügen" und klicken Sie auf "Module" ein neues Modul einzufügen VBA
2

Fügen Sie den folgenden Code , um eine neue Sub-Prozedur zu erstellen : .

Private Sub createCollection ()
3

Kopieren Sie den folgenden Code, um eine neue Kollektion zu schaffen :

Dim ProductCollection Wie CollectionSet ProductCollection = New Collection
4

hinzufügen Artikel zu Ihrer Sammlung , indem Sie den folgenden Code :

productCollection.Add " phones" productCollection.Add "pc" productCollection.Add "monitor" productCollection.Add " Handys "
5

Rufen Sie die " GetCollection "-Funktion und übergeben Sie die Sammlung Objekt :

Anruf GetCollection ( ProductCollection ) End Sub
6

Kopieren Sie den folgenden Code, um die " GetCollection erstellen " Funktion und zeigt die Elemente aus der Auflistung mit der " Direkt-Fenster : "

private Function GetCollection ( myCollection As Object ) Debug.Print ( myCollection.Item (1) ) Debug.Print ( myCollection.Item (2 ) ) Debug.Print ( myCollection.Item (3) ) Debug.Print ( myCollection.Item (4) ) End Function
7

Drücken Sie "Strg " und " G" , um das Direkt-Fenster und klicken Sie in das " createCollection "-Verfahren . Drücken Sie "F5" um das Programm auszuführen und die Ergebnisse anzuzeigen.