Live-Forum - Die aktuellen Beiträge
Datum
Titel
04.10.2025 18:18:42
Anzahl in einer Zelle automatisch ermitteln
04.10.2025 17:44:54
Power Query - Filtern einer Spalte mittels einer Liste
04.10.2025 15:35:03
Range um eine Einzelzelle erweiternerweitern
04.10.2025 14:27:49
Was ist mit dem CEF Forum passiert?
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1508to1512
1508to1512
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

CheckBox Abfragen

Forumthread: CheckBox Abfragen

CheckBox Abfragen
14.08.2016 10:57:33
Kopenhagen
ich habe wieder mal ein Anliegen
kann man folgenden Code vereinfachen
dieser Algorithmus geht bis zur Checkbox16
Private Sub CheckBox10_Click()
CheckBox9.Visible = False
If CheckBox10.Value = False And CheckBox11 = False And CheckBox12 = False And CheckBox13 =  _
False And CheckBox14.Value = False And CheckBox15 = False And CheckBox16 = False Then CheckBox9.Visible = True
End Sub


Private Sub CheckBox11_Click()
CheckBox9.Visible = False
If CheckBox10.Value = False And CheckBox11 = False And CheckBox12 = False And CheckBox13 =  _
False And CheckBox14.Value = False And CheckBox15 = False And CheckBox16 = False Then CheckBox9.Visible = True
End Sub
Es funktioniert zwar alles, sieht aber umständlich aus.
Tschüß Steffen
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: CheckBox Abfragen
14.08.2016 11:13:42
Gerd
Hallo Steffen!
Unterstellt die Checkboxen sind in einer Userform:
Private Sub CheckBox10_Click()
Dim Z As Long
For Z = 10 To 16
If Controls("CheckBox" & CStr(Z)) = True Then
CheckBox9.Visible = False
Exit Sub
End If
Next
CheckBox9.Visible = True
End Sub
Gruß Gerd
Anzeige
AW: CheckBox Abfragen
15.08.2016 20:01:46
Kopenhagen
Danke Euch
Mit Klassenmodulen habe ich mich noch nicht beschäftigt.
Da muss ich mich erstmal recherchieren.
Tschüss Steffen
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige