For Each für Merdim. Array
08.07.2003 09:42:20
Ruben
Momentan greifen ich auf alle Elemente eines Arrays (da ich nciht weiß wie groß das Array ist (dynamisches ReDim) wie folgt zu:
Dim Datei As Variant
Dim Counter As Integer
Dim KorrektesArray() As Variant
Counter = 0
For Each Datei in DateiArray
If Datei <> ""
KorrektesArray(Counter)=Datei
Counter=Counter+1
Next
Das Array "NeuesArray" wird vorher natürlich auch ReDim-ensioniert. Klappt alles wunderbar.
Nur: Wie sieht das ganze aus, wenn ich beide Arrays 2-Dimensional verwenden will, um außer der "Datei" noch Datum oder ähnlichen speichern und übergeben zu können?
Ciao
Ruben