Herbers Excel-Forum - das Archiv
label.caption in einer Schleife ändern
Informationen und Beispiele zu den hier genannten Dialog-Elementen:
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