wenn alle Checkbox im Frame = false

Forumthread: wenn alle Checkbox im Frame = false
2 Beiträge zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: wenn alle Checkbox im Frame = false

24.08.2005 12:12:41

Edwin

Hallo,
ich habe in einem Frame mehrere Checkboxen. Wenn alle Checkboxen auf False stehen, möchte ich eine Prozedur starten.
Wie geht das?
Danke und liebe Grüße
Edwin

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: wenn alle Checkbox im Frame = false

24.08.2005 12:42:58

Ralf
Super, danke!

24.08.2005 12:55:58

Edwin

AW: wenn alle Checkbox im Frame = false

24.08.2005 12:42:58

Ralf

Hallo Edwin,
so geht's:


Sub Boxen_checken()
Dim oCB As MSForms.Control, bAus As Boolean
For Each oCB In UserForm1.Controls
If TypeOf oCB Is MSForms.CheckBox Then
If oCB.Value = True Then
bAus = True
Exit For
End If
End If
Next
If Not bAus Then
'Hier Deine Anweisungen für den Fall, wenn alle Boxen aus sind....
End If
End Sub

Diese Prozedur (Boxen_checken) rufst Du im Clickereigniss Deiner Checkboxen auf.
Ciao, Ralf

Super, danke!

24.08.2005 12:55:58

Edwin

Hallo Ralf,
vielen Dank, hat super geklappt.
Gruß
Edwin