VBA - Benutzerdef. "Subtypen" ansprechen
17.06.2020 18:01:27
Alexander
ich habe ein Array XARRAY, dessen Datentyp ein benutzerdefinierter Datentype WTYPE ist. (Hier sehr sehr trivial dargestellt, um das Problem zu beschreiben. Die wahre Aufgabe ist deutlich komplizierter.)
Private Type WTYPE
tSubA As String
tSubB As String
tSubC As String
End Type
Private XARRAY(1 To 100) As WTYPE
Nun möchte ich mit einer Funktion eine Reihe von Indizes nur in einem bestimmten Subtyp von XARRAY füllen: Funktionsaufruf wäre also z.B. XARR_FUELLEN 20, 29, tSubB
Function XARR_FUELLEN(intFrom As Integer, intTo as Integer, varSubType as ?)
Dim intI As Integer
For intI = intFrom To intTo
XARRAY(intI).varSubtype = "A"
Next intI
End Function
Und nun die spannende Frage: Als was muss ich in der Funktion die Variable varSubType deklarieren, damit die Funktion läuft?