version=1.0.0 vdate=04.09.2019 fname=cast_emptyarray.bas ns=%NAMESPACE% fpath=/vba/cast ====== [VBA] emptyArray(), emptyArrayRef() ====== //Einen leeren Array erstellen// ==Version %%version%% - %%vdate%%== Diese Methoden erstellen leere Arrays, die später mit redim endgültig zu dimensionieren {{%%fname%%|Download %%fname%% (V-%%version%%)}} Ich habe Funktion, die einen Array zurückgeben. Ggf. auch einen leeren. Bisher hatte ich das immer als ''myVar = Array()'' gelöst. DOch nach dem neusten Update funktioniert ''Array()'' nicht mehr. \\ Neu läse ich das über eine Deklarierte Funktion ''Lib "oleaut32" Alias "SafeArrayCreateVector"''. Diese Definition muss aber genau definiert sein, was für ein Array zurückgegeben wird. Darum habe ich all die Definitionen in einem Modul zusammengefasst ===== Definitionen ===== Array = emptyArray([vbVarType]) Array = emptyArray(Array) Public Function emptyArray(Optional ByVal iVarType As VbVarType = vbVariant) As Variant Public Function emptyArrayRef(ByRef ioArray As Variant) As Variant ===== Beispiele ===== ===== Code =====