Label1 + 1 ?

Informationen und Beispiele zu den hier genannten Dialog-Elementen:


Excel-Version: 9.0 (Office 2000)
nach unten

Betrifft: Label1 + 1 ?
von: Norbert
Geschrieben am: 14.06.2002 - 07:18:15

Hallo,

ich habe mehrere Label.(alle Label haben die backcolor = grau)
Durch Drücken eines Buttons wird Label1.backcolor = grün.
Drücke ich nochmals den Button soll der nächste Label grün werden. Kann man den nächsten Label irgendwie ansprechen wie Nächster Label = Label1 + 1
oder so etwas wie Label(n) +1 ??


Danke und schönes Wochenende

Norbert



nach oben   nach unten

Re: Label1 + 1 ?
von: Hajo
Geschrieben am: 14.06.2002 - 07:39:42

Hallo Norbert

schreibe folgenden Code in die Userform


Option Explicit
Public As Integer

Private Sub CommandButton1_Click()
    On Error Resume Next    ' falls alle schon gefärbt
    Controls("Label" & I).BackColor = vbGreen
    I = I + 1
End Sub

Private Sub UserForm_Initialize()
    I = 1
End Sub

Gruß Hajo


nach oben   nach unten

Re: Danke
von: Norbert
Geschrieben am: 14.06.2002 - 07:44:27

Hallo Hajo,

Danke

Norbert


 nach oben

Beiträge aus den Excel-Beispielen zum Thema "Eintrag des Scrollbereiches"