Set DocCollection über eine Function

[TMC]

Gibt es eine Möglichkeit, eine NotesDocumentCollection über eine Function zu initialisieren?

Ich will diese Prozedur gerne in eine Function auslagern und vom Hauptcode aus aufrufen.

[TMC]

Ich bin gerade selber draufgekommen (ich war schon kurz vor der Lösung, hatte nur nicht mit "Set" gearbeitet.....):

Hauptcode:

Code

Set collection = getMyCollection()

Die Function (kleiner Auszug):

Code

Function getMyCollection() As NotesDocumentCollection

      '(.........)

      Set getMyCollection = db.AllDocuments

End Function