3
Contributors
3
Replies
13
Views
4 Years
Discussion Span
Last Post by star.tamy.7
1

This should working :

Private Sub Command1_Click()
For Each ctl In Me.Controls
    If TypeOf ctl Is CheckBox Then
        If ctl.Value = vbChecked Then
            MsgBox ctl.Name
        End If
    End If
Next
End Sub
Votes + Comments
never think about this in my program. very useful function and svae my times.
0

What a piece of code.
Thank you very much for the help sir.

Vixion

This question has already been answered. Start a new discussion instead.
Have something to contribute to this discussion? Please be thoughtful, detailed and courteous, and be sure to adhere to our posting rules.