Microsoft Excel

Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema Userform
BildScreenshot zu Userform Userform-Seite mit Beispielarbeitsmappe aufrufen
Informationen und Beispiele zum Thema Label
BildScreenshot zu Label Label-Seite mit Beispielarbeitsmappe aufrufen
Informationen und Beispiele zum Thema ListBox
BildScreenshot zu ListBox ListBox-Seite mit Beispielarbeitsmappe aufrufen

Label Caption entfernen | Herbers Excel-Forum


Betrifft: Label Caption entfernen von: siegfried
Geschrieben am: 14.01.2010 19:46:58

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

  

Betrifft: die erste Schleife brauchst du gar nicht von: Rudi Maintaire
Geschrieben am: 14.01.2010 20:01:40

Hallo,
irgendwo noch ein On Error drin? .Clear gibt es nicht für Labels

Gruß
Rudi


  

Betrifft: AW: die erste Schleife brauchst du gar nicht von: siegfried
Geschrieben am: 14.01.2010 20:09:45

Hallo Rudi,

1. die erste Schleife habe ich auch schon weggelassen. Mein Problem ist geblieben.
2. ich habe statt Clear auch .Caption = "" probiert. Mein Problem ist geblieben.

Siegfried


  

Betrifft: an dem Code liegt es nicht von: Rudi Maintaire
Geschrieben am: 14.01.2010 21:09:52

Hallo,
lad mal die Mappe hoch.

Gruß
Rudi


Beiträge aus den Excel-Beispielen zum Thema "Label Caption entfernen"