Hallo zusammen,
ich habe in einer Userform eine Listbox eingefügt.
Nach Auswahl einer Zeile sollen alte Einträge aus Labels entfernt werden (die Einträge sind das Ergebnis von Rechenoperationen).
Danach sollen evtl. schon vorhandene Einträge aus einem Tabellenblatt eingefügt werden. Ich verwende dazu folgenden Code:
' entleert die Labels
For Zähler = 1 To 9
Controls("Label" & Zähler + 21).Clear
Next Zähler
' füllt die Labels entsprechend der Auswahl
For Zähler = 1 To 9
Controls("Label" & Zähler + 21).Caption = _
Range("Z1").Offset(ListBox1.ListIndex + 1, Zähler).Value
Next Zähler
Der Code funktioniert, wenn ich die Userform schließe und dann wieder aufrufe.
Sobald ich aber die Userform geöffnet lasse und eine andere Auswahl in der Liste treffe, bleiben die Werte in den Labels erhalten.
Was muß ich anders machen?
Siegfried