Ein Klassenmodul in einer Collection speichern (VBA für Excel)

[r0ll0r]

Hallo zusammen,

folgende Situation:
Ich habe ein Klassenmodul "Person", wo ich verschiedene Infos habe. Nun möchte ich mehrere Personen in einer Collection speichern und später in einer Schleife auslesen. Leider kommt immer die Meldung "Typen unverträglichkeit". Woran kann das liegen? Kann ich in einer Collection auch eine Typzuweisung machen?

---- Person ---
Option Explicit

Private pName As String
Private pVorname As String

Public Property Let Nachname(ByVal value As String)
    pName = value
End Property

Public Property Get Nachname() As String
    Nachname = pName
End Property

Public Property Let Vorname(ByVal value As String)
    pName = value
End Property

Public Property Get Vorname() As String
    Vorname = pVorname
End Property

...

-------------

-------
...

Dim item As Long
    For item = 1 To colPerson.count   'Liste von Personen
        Dim person As Person
        Set person = colPerson(item)
        --> An dieser Stelle tritt die Fehlermeldung auf
...
------