Live-Forum - Die aktuellen Beiträge
Datum
Titel
23.04.2024 17:41:19
Link erstellen mit Formel oder VBA?
23.04.2024 17:00:22
Summe und Ausgabe
23.04.2024 16:27:34
Excel Starthinweis - Arbeitsmappenleistung überprüfen ...
23.04.2024 16:15:16
Mittels VBA vordefinierte Kommentare in Zellen einfügen?
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
548to552
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
548to552
548to552
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Kontrollkästchen auswerten

Kontrollkästchen auswerten
17.01.2005 11:22:00
Patrick
Hallo!
ich habe eine Liste mit 12 Kontrollkästchen mit verschiedenen namen!
Jetzt soll man aus diesen 12 Kästchen max 4 auswählen können!
Ich bräuchte einen Lösungsanstz denn irgendwie komme ich nicht weiter!
vielen dank
Patrick

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Kontrollkästchen auswerten
17.01.2005 13:35:52
Josef
Hallo Patrick!
Bei CheckBoxen aus "Steuerelemente" zB. so:


      
Option Explicit
Private Sub CheckBox1_Click()
chkCheck CheckBox1
End Sub
Private Sub CheckBox2_Click()
chkCheck CheckBox2
End Sub
'usw.

Private Sub chkCheck(ckb As msforms.CheckBox)
Dim ctrl As OLEObject
Dim i As Integer
   For Each ctrl In Me.OLEObjects
      If TypeName(ctrl.Object) = "CheckBox" Then
         If ctrl.Object = True Then i = i + 1
      End If
   Next
If i > 4 Then ckb = False
End Sub 
Anzeige

Links zu Excel-Dialogen

CheckBox

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige