CheckBox Controls

[humberto]

Dim ctl As Control
Dim intCounter As Integer

For Each ctl In Me.Controls
If TypeOf ctl Is CheckBox Then
If ctl.Value = True Then
intCounter = intCounter + 1
End If
End If
Next ctl

msgbox intCounter


(vba)
After install Microsoft Office 2003 this not work anymore
it look also for the OptionButton

[mtuersley]

That's a known issue Humberto. AutoCAD has to be installed after Office 2003. In your case, just go to Add/Remove Programs and do a repair on your AutoCAD - it should fix your problem.