Live-Forum - Die aktuellen Beiträge
Datum
Titel
13.10.2025 19:31:31
VBA Formel mit Bezug auf Überschrift anstatt Spalte
13.10.2025 15:10:17
Überlappende Zeiträume über mehrere Tabellen mit leeren Zell
13.10.2025 13:34:56
PQ Abfrage mit verschiedenen Werten ausführen + Protokoll
13.10.2025 12:24:02
Zählen in Abhängigkeit einer Jahreszahl
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
1460to1464
1460to1464
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Checkbox

Forumthread: Checkbox

Checkbox
26.11.2015 10:39:55
Ingo
Hallo
Ich habe ein Problem und weiß nicht wie ich den Code schreiben soll
-ich habe 10 Checkboxen in meiner UserForm
- jetzt soll geprüft werden ob eine checkbox aktiv ist, wenn nicht, dann soll das Makro abbrechen
Ich habe das jetzt so gelöst, aber das gefällt mir nicht
IF checkbox1=false and checkbox2=False and.......checkbox10=false then end sub
Geht das auch einfacher zu lösen ?
Grüße
Ingo

Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Checkbox
26.11.2015 10:51:33
Peter
Hallo Ingo,
das geht z. B. auch so: 
Option Explicit
Private Sub CommandButton1_Click()
Dim iIndx  As Integer
Dim bAktiv  As Boolean
For iIndx = 1 To 10
If Controls("CheckBox" & iIndx) Then
bAktiv = True
Exit For
End If
Next iIndx
If bAktiv Then
'    tu etwas, eine Box ist aktiv
Else
Exit Sub
End If
End Sub

Gruß Peter

Anzeige
AW: Checkbox
26.11.2015 19:59:16
Ingo
Hallo Peter
Danke dir -- das hilft mir erst einmal weiter
Grüße
Ingo

Danke fürs Ignorieren :-(
27.11.2015 08:22:20
Matthias

AW: Checkbox
26.11.2015 10:52:01
Matthias
Hallo
als Ansatz:
Dim x
For x = 1 To 10
If Controls("Checkbox" & x).Value = True Then
MsgBox "mim. eine Box ist aktiviert"
Exit Sub
Else
End If
Next
MsgBox "alles ist deaktiviert"
Gruß Matthias

Anzeige
AW: Checkbox
27.11.2015 18:00:17
Ingo
Hallo Matthias
ich wollte dich nicht ignorieren - ich hatte dann leider keine Zeit mehr.
ich komme jetzt auch erst wieder dazu was für meine Datei zu machen
entschuldige bitte
PS: deine Lösung ist auch recht gut -- danke dir
Grüße Ingo
;

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