Steuerelement identifizieren
15.01.2017 10:36:59
Rosenfeld
ich habe in einer UserForm eine Matrix mit Labels erstellt (7 Spalten mit je 72 Zeilen).
In Abhängigkeit der Auswahl eines Labels soll in dieser Matrix und in einer Tabelle der entsprechende Text gelöscht und die Hintergrundfarbe geändert werden.
Bisher habe ich dazu einen Code für jedes einzelne Label eingefügt.
Private Sub Label73_Click()
Dim LblNr as Integer
LblNr = ?
' Label73.Caption = ""
' Label73.BackColor = RGB(255, 255, 255)
' Range("D2").Clear
End Sub
Gruß
Siegfried