Thread: CheckBox
View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Jean Jean is offline
external usenet poster
 
Posts: 78
Default CheckBox

Hi
I have one UserForm1 with 14 CheckBox All are Enabled = false
I would like make part of these checkBox Enabled=True
And Show the userForm1 with all checkBox some enabled other disabled
to permit to check only some of checkboxes Enabled.

Sub Print_period()
Dim Cbk As CheckBox
Dim Count As Integer
Dim Prd As Integer
Prd = 5
Count = 0
For Each Cbk In UserForm1.checkbox '13 checkbox
Count = Count + 1
If Count < Prd Then
Cbx.Enabled = True
End If
Next

UserForm1.Show

But Something is wrong.

Thank you for your help.

Jean