View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
LongBeachGuy LongBeachGuy is offline
external usenet poster
 
Posts: 14
Default For Each Ctl In Me.Controls


Merry Christmas and a Happy New Year.


I want to

#1. Identify controls in my userform1 as checkbox

#2.Find out how many and which checkboxes are checked

#3. Run another process using the selected enabled checkboxes.

Me.Controls does not work.

I tried:

Dim ctrl As MSForms.Control
Dim cbox As MSForms.CheckBox

For Each ctrl In Me.Controls

If TypeOf ctrl Is MSForms.CheckBox Then
Set cbox = ctrl
msgbox cbox.Name
End If

Next



My computer stops at the first line: :

"For Each ctrl In Me.Controls"

and gives:

"Run-time error '438'"
"Object doesn't support this object or method

Please help me,

Jose