Tach Community,
ich habe eine Statistik mit Excel 2002 erstellt,
in der u.a. eine Checkliste dargestellt wird.
diese wird durch Checkboxen erzeugt.
jetzt habe ich das problem, dass ich den
status dieser checkboxen prozentual wiedergebe.
also x% von n checkboxen sind angeklickt.
der haken bei der sache…die checkliste wird immer erweitert.
und der start/default wert der checkbox ist „“
hm also wenn Du einmal eine Checkbox angeklickt hast, dann bleibt entweder WAHR oder FALSCH in der Zelle stehen - auch nach erneutem öffnen nicht…
Wenn Du nun mit den leeren Dingern Probleme hast, dann schreib einfach in alle Ausgabezellen „FALSCH“ und schon klappts…
die Checkbox passt sich an, so dass dann die Haken verschwinden, so denn da welche sind…
Alternative wäre noch, dass Du mit vba die Checkboxen zählst und auch gleich prüfst ob sie aktiv oder nicht sind…
HTH
Munich
Hi Pixelkönig,
ich habe eine Statistik mit Excel 2002 erstellt,
in der u.a. eine Checkliste dargestellt wird.
diese wird durch Checkboxen erzeugt.
jetzt habe ich das problem, dass ich den
status dieser checkboxen prozentual wiedergebe.
Nö, das Problem hast du nicht, du hast das Problem dass du den Status (noch) nicht wiedergeben kannst *grins*
also x% von n checkboxen sind angeklickt.
der haken bei der sache…die checkliste wird immer erweitert.
und der start/default wert der checkbox ist „“
Option Explicit
Sub til()
'Code stammt von K.Rola aus einem anderen Forum
Dim cb As Object
Dim CbCountTrue As Long
Dim CbCountFalse As Long
Dim CbCountElse As Long
For Each cb In Sheets(1).OLEObjects
If cb.progID Like „Forms.Check*“ Then
Select Case cb.Object.Value
Case True: CbCountTrue = CbCountTrue + 1
Case False: CbCountFalse = CbCountFalse + 1
Case Else: CbCountElse = CbCountElse + 1
End Select
End If
Next
MsgBox "Wahr: " & CbCountTrue & Chr(10) & _
"Falsch: " & CbCountFalse & Chr(10) & _
"TST: " & CbCountElse
End Sub
Gruß
Reinhard