label.caption in einer Schleife ändern

• label.caption in einer Schleife ändern von drotleff arno vom 05.12.2003 21:06:49
  • AW: label.caption in einer Schleife ändern - von Nepumuk am 05.12.2003 21:15:41
    • AW: label.caption in einer Schleife ändern - von arno drotleff am 05.12.2003 21:37:28

Betrifft: label.caption in einer Schleife ändern
von: drotleff arno
Geschrieben am: 05.12.2003 21:06:49
Hi Leute,

Ich habe eine UserForm3 in der ist eine Multiseite mit 10 Seiten in dieser wiederum sind 36 Labels pro Seite, nun will ich die Eigenschaft Caption und BackColor bei allen ändern also 360 mal.
Wie kann ich das mit einer Schleife.

Dim i As Integer
For i = 0 To 360
If UserForm3.Label& i.Caption = "" Then
UserForm3.Label& i.Caption = str_Text
UserForm3.Label& i.BackColor = &Hff&
End If

Obige Lösung geht nicht :(

MfG Arno Drotleff

Betrifft: AW: label.caption in einer Schleife ändern
von: Nepumuk
Geschrieben am: 05.12.2003 21:15:41
Hallo Arno,
beispielsweise so:

Dim intIndex As Integer
For intIndex = 1 To 360
UserForm3.Controls("Label" & CStr(intIndex)) = "Ok"
Next

Code eingefügt mit: Excel Code Jeanie

Gruß
Nepumuk

Betrifft: AW: label.caption in einer Schleife ändern
von: arno drotleff
Geschrieben am: 05.12.2003 21:37:28
Hallo Nepumuk,

Danke, habe heute den ganzen Tag versucht die Lösung zu finden, dabei ist es so einfach
wenn man’s weiß :)

Gruss Arno

Excel-Beispiele zum Thema " label.caption in einer Schleife ändern"
In einer Schleife auf Elemente einer UserForm zugreifen	CheckBoxes in UserForms in eine Schleife einbinden
Gruppe von UserForm-ListBoxes über eine Schleife ansprechen	UserForm-Optionsfelder über eine Schleife zurücksetzen