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

Kontrollkästchen auswerten

Forumthread: 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
Anzeige

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
;

Beliebteste Forumthreads (12 Monate)

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