View Single Post
  #3   Report Post  
Posted to microsoft.public.excel.programming
JMB JMB is offline
external usenet poster
 
Posts: 2,062
Default Looping through a group of checkboxes

Maybe this will work

If o.GroupName = "CG" Then

"asdfasdf" wrote:

I'm trying to loop through a group of checkboxes, but i'm having trouble
figuring out how to go about it.

here is my current code:

Dim o As OLEObject
Dim iCCCount, iCCColumn As Integer
Dim iCGCount, iCGColumn As Integer
iCCCount = 1
iCCColumn = 1
iCGCount = 1
iCGColumn = 1
'MsgBox cgAdvertiser.Caption
Dim c As CheckBox
For Each o In Sheet1.OLEObjects
If TypeName(o.Object) = "CheckBox" Then
If c.GroupName = "CG" Then
iCGCount = iCGCount + 1
End If
End If
Next

so when it finds the type checkbox object i want to get the groupname.
however i get an error telling me that object var or with var is not set.

any help woulb be appreciated.
thanks