|
Hallo,
Ahaa, daran lag der Fehler! Ich komme aus der C++-Programmierung, daher dachte ich es genüge, einmalig am Ende "As String" zu schreiben. Dann lag der Fehler die ganze Zeit daran, dass nur das letzte der Arrays auch wirklich als String deklariert worden war. Aber mal ehrlich, so wirklich "zusammenfassend" ist das dann ja auch nicht, man spart sich nur das Wörtchen "Dim" bei multiplen Deklarationen...
Ok, funktioniert, vielen Dank!
Jetzt habe ich noch ein Problem. Wie beschrieben, weise ich dem Array seinen Wert über eine String-Adresse zur Exceltabelle über Property-Let zu, sprich die Syntax lautet:
Public Property Let MonthList(sAddr As String)
If bIsInitialized = False Then
aMonthList = mArrayStrCreateFromAddr(CStr(sAddr), 1)
End If
End Property
Public Property Get MonthList() As String() '<-- wird nicht toleriert! Er möchte exakt denselben Datentyp wie im Argumentenfeld von Property-Let, sprich String ohne Datenfeld
MonthList = aMonthList
End Property
Allerdings möchte ich per Property-Get logischerweise das gesamte Datenfeld zurückgeben. Nur erlaubt er mir die Rückgabewert-Deklaration so nicht, da die Parameter scheinbar mit denen der Property-Let-Funktion übereinstimmen müssen.
Wie kann ich dieses Problem nun lösen, ohne erneut auf Variant zurückgreifen zu müssen? :-)
Merci und LG
Binary
|