I'm sorry - i think i misunderstood your need.
you're wanting to count how many option buttons that have "Yes" as the text
are selected.

Dim c As Control
For Each c In Controls
If TypeName(c) = "OptionButton" Then
If c.Value = True And c.Caption = "Yes" Then
countYes = countYes + 1
End If
End If
Next

"naddad" wrote:


thanks, TypeName(c) returns "OptionButton"
But c is a control, is there a way to cast it to an OptionButton so it
recognizes the caption?


--
naddad
------------------------------------------------------------------------
naddad's Profile: http://www.excelforum.com/member.php...o&userid=29817
View this thread: http://www.excelforum.com/showthread...hreadid=495201