dyn. Array in Datei speichern
16.02.2004 11:13:56
ben
Dim AMSKM() As Variant 'Dyn. Feld
-----%<-------schnipp-----
Open "testdatei" For Output As dateinummer
For index1 = 1 To UBound(AMSKM()) - 1
Put "testdatei", index1, AMSKM(index1, 1)
Next index1
Close dateinummer
-----%<-------schnipp-----