Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Zustand von Kontrollkästchen in Schleife abfragen

Zustand von Kontrollkästchen in Schleife abfragen
04.12.2004 23:28:32
Kontrollkästchen
Hallo Leute,
ich habe auf der UserForm1 40 Kontrollkästchen angelegt und möchte diese erstmal alle auf FALSE stellen:
UserForm1.CheckBox1=False
....
....
UserForm1.CheckBox40=False
Einfacher wäre es mit einer Schleife.
Kann mir Jemand sagen wie ich dies in einer Schleife erledigen kann?
Viele Grüße
Werner
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zustand von Kontrollkästchen in Schleife abfra
04.12.2004 23:32:24
Kontrollkästchen
Hallo Werner!
ZB. so:

Private Sub UserForm_Initialize()
Dim msfChk As MSForms.CheckBox
For Each msfChk In Me.Controls
msfChk = False
Next
End Sub

Gruß Sepp
Anzeige
Nimm besser diesen Code
04.12.2004 23:45:54
Josef
Hallo Werner!
War ein bisschen zu schnell geschossen ;-)
Nimm diesen Code:

Private Sub UserForm_Initialize()
Dim oChk As MSForms.Control
For Each oChk In Me.Controls
If TypeOf oChk Is MSForms.CheckBox Then oChk = False
Next
End Sub

Gruß Sepp
Anzeige
AW: Zustand von Kontrollkästchen in Schleife abfra
Kontrollkästchen
Hallo Werner,
hier ein Ansatz (setzt alle Checkboxen beim Aufruf der UF auf False)
Private Sub UserForm_Initialize() Dim ctl As Control For Each ctl In Me.Controls If Left(ctl.Name, 8) = "CheckBox" Then ctl.Value = False Next End Sub
Gruß Roland
AW: Zustand von Kontrollkästchen in Schleife abfragen
Kontrollkästchen
Dim c as byte
For c = 1 to 40
controls("CheckBox" & c)= false
next
Udo
Anzeige
Danke für die schnelle Hilfe
05.12.2004 00:06:50
Werner
Hallo Leute,
vielen Dank für die schnelle Hilfe.
Das bringt mich weiter.
Viele Grüße
Werner

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige