Hallo zusammen,
ich notiere in einer TextBox einer UserForm Zahlen, die ich später hinsichtlich der Anzahl auswerte. Diese Auswertung muss ich für spätere Maßnahmen speichern.
Um die Zahl der Steuerelemente zu begrenzen, habe ich eine ListBox eingefügt.
Die Übergabe der Auswertung an die ListBox funktioniert soweit auch, allerdings verschwindet mit jedem neuen Eintrag der alte.
Die ListBox wird mit folgendem Code wird über das Change-Ereignis der TextBox gefüllt (Der Code ist in einem Klassenmodul).
ReDim Preserve ArrNotiz(1 To Range("Anz.S").Value, 1 To 3)
ArrNotiz(ZeileNr, 1) = AnzH
ArrNotiz(ZeileNr, 3) = AnzG
objListBox.List = ArrNotiz
Wie muss ich es anstellen, dass alle Einträge erhalten bleiben?
Gruß
Siegfried