Hallo zusammen,
ich will den inhalt der Spalte A in ein Array speichern und später dann in z. b. Spalte B wieder ausgeben.
Ich will aber die leeren Zellen in Spalte A nicht mitabspeichern.
Ich hab schon was entwickelt, aber es hakt immer noch.. er speichert die leeren zellen mit ab.
Dim a As Integer
Dim Pool(55)
a = 1
For i = 1 To 55
If ActiveSheet.Cells(i, 1) 0 Then _
Pool(a) = Cells(i, 1)
a = a + 1
Next i
und wie kann ich dann später die Datensätze wieder abrufen!?
hab es mit :
For i = 1 To a
Cells(i, 8) = Pool(i)
Next i
versucht aber hier meckert er auch...
danke...