excel vba Multiple check boxes
<p>I'm trying to collect the status of many Check Boxes in a User form and write X for check box that is in a  False status Or V when it is in True status,
but I always get the run time error when It gets to the line:</p>

<pre><code>For Each chk In UserForm1
</code></pre>

<p>Run-Time error '438': Object Doesn't support this property or method</p>

<p>Here is what I have so far:</p>

<pre><code>    Private Sub CommandButton1_Click()
Dim ws As Worksheet
Dim Col As Long
Dim chk As Control
Set ws = Worksheets("Sheet1")
'find first empty row in database
iRow = ws.Cells(Rows.Count, 1) _
  .End(xlUp).Offset(1, 1).Row
Col = 1
MultiPage1.Value = 1
For Each chk In UserForm1
    If GroupName = Rooms Then
        If (chk.Value) = True Then
            ws.Cells(iRow, Col).Value = V
            Col = Col + 1
        End If
        Else
            ws.Cells(iRow, Col).Value = X
            Col = Col + 1
    End If
Next
End Sub
</code></pre>

<p>Any Suggestions?</p>

<p>Thanks in advance for any help or leads</p>