Come passare una raccolta di una funzione in VBA

Passaggio di una raccolta di una funzione in Visual Basic, Applications Edition (VBA ) è molto simile al trasferimento di altri tipi di dati variabili . Una raccolta è un oggetto che viene utilizzato per raggruppare oggetti o oggetti simili . Sarà necessario definire il parametro della funzione come un " oggetto" per passare una raccolta con successo alla funzione. Una volta che la collezione è in funzione , è possibile accedere ai dati di raccolta utilizzando la proprietà "Oggetti" . Istruzioni
1

Avviare Microsoft Excel , fare clic sulla scheda "Sviluppatore " e cliccare su " Visual Basic " per avviare l'editor di VBA . Fare clic sul menu "Inserisci" e fare clic su "Modulo" per inserire un nuovo modulo VBA
2

Aggiungere il seguente codice per creare una nuova procedura secondaria : .

CreateCollection Private Sub ( )
3

Copia e incolla il seguente codice per creare una nuova collezione :

Dim ProductCollection Come ProductCollection CollectionSet = nuova Collezione
4

Aggiungi articoli per la vostra collezione con l'aggiunta del seguente codice :

productCollection.Add "telefoni " productCollection.Add "pc" productCollection.Add "monitor " productCollection.Add " mobiles "
5

richiamare la funzione " getCollection " e passare l'oggetto di raccolta :

chiamata getCollection ( ProductCollection ) End Sub
6

Copia e incolla il seguente codice per creare il " getCollection "la funzione e visualizzare gli elementi della collezione utilizzando il" finestra immediata : "

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

Premere " Ctrl" e " G " per visualizzare la finestra immediata e fare clic all'interno della procedura " createCollection " . Premere il tasto " F5 " per eseguire il programma e visualizzare i risultati .

• Come cancellare e Popola Caselle di riepilogo in Visual Basic 2010 
• Come collegare VB.NET Con Oracle