<div>
It looks like the code you posted is in a UserForm. Correct? Are you saying that you want to modify that code to look for controls on a sheet named 'Page1'?
</div>


<div>
You're welcome and I'm glad I could help. <br />
<br />
Marty - MVP 2009 to 2012
</div>


<div>
<div class="content wysiwyg-content">
office 2010 &nbsp;excel vba<br />
userform with mutlipage object and 10 &quot;Pages&quot;<br />
I have code that will for any optionbutton being selected on a multipage object.<br />
<br />
<br />
Dim cCont As Control<br />
&nbsp; &nbsp; &nbsp;<br />
&nbsp; &nbsp; For Each cCont In Me.Controls<br />
&nbsp; &nbsp; &nbsp; &nbsp; If TypeName(cCont) = &quot;optionbutton&quot; Then<br />
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; cCont.Value = False<br />
&nbsp; &nbsp; &nbsp; &nbsp; End If<br />
&nbsp; &nbsp; Next cCont<br />
<br />
I need the code revised to specifically lokk at &quot;Page&quot; &nbsp;like &quot;page1&quot;<br />
<br />
Then if any optionbutton selected = true then<br />
&nbsp;do something..<br />
<br />
Dim cCont As Control<br />
&nbsp; &nbsp; &nbsp;<br />
&nbsp; &nbsp; For Each cCont In Me.Controls<br />
&nbsp; &nbsp; &nbsp; &nbsp; If TypeName(cCont) = &quot;optionbutton&quot; Then<br />
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; ' do something here...<br />
&nbsp; &nbsp; &nbsp; &nbsp; End If<br />
&nbsp; &nbsp; Next cCont<br />
<br />
Thanks<br />
fordraiders
</div>
</div>


office 2010  excel vba
userform with mutlipage object and 10 "Pages"
I have code that will for any optionbutton being selected on a multipage object.


Dim cCont As Control
     
    For Each cCont In Me.Controls
        If TypeName(cCont) = "optionbutton" Then
            cCont.Value = False
        End If
    Next cCont

I need the code revised to specifically lokk at "Page"  like "page1"

Then if any optionbutton selected = true then
 do something..

Dim cCont As Control
     
    For Each cCont In Me.Controls
        If TypeName(cCont) = "optionbutton" Then
            ' do something here...
        End If
    Next cCont

Thanks
fordraiders

It looks like the code you posted is in a UserForm. Correct? Are you saying that you want to modify that code to look for controls on a sheet named &#39;Page1&#39;?

You&#39;re welcome and I&#39;m glad I could help. 

Marty - MVP 2009 to 2012

check for an option box being selected on a spefic page

office 2010  excel vba
userform with mutlipage object and 10 &quot;Pages&quot;
I have code that will for any optionbutton being selected on a multipage object.


Dim cCont As Control
     
    For Each cCont In Me.Controls
        If TypeName(cCont) = &quot;optionbutton&quot; Then
            cCont.Value = False
        End If
    Next cCont

I need the code revised to specifically lokk at &quot;Page&quot;  like &quot;page1&quot;

Then if any optionbutton selected = true then
 do something..

Dim cCont As Control
     
    For Each cCont In Me.Controls
        If TypeName(cCont) = &quot;optionbutton&quot; Then
            &#39; do something here...
        End If
    Next cCont

Thanks
fordraiders

Microsoft Excel topics include formulas, formatting, VBA macros and user-defined functions, and everything else related to the spreadsheet user interface, including error messages.