Control Buttons to VBA

J

JasonSelf

I have a document that has around 600 Option buttons placed by th
Control Toolbox. I need to find out if there is a way that i can mas
edit these in VBA. When I double click them in design mode it simpl
brings up a blank vba statement. I need to get at the actual functio
of these things, preferably in bulk...as I need to append a shee
specification to all the cell links. Any help would be appreciated...

Thanks as always,
Jason Sel
 
B

Bob Phillips

Jason,

here is how you can iterate through the buttons

Dim obj As Object

For Each obj In ActiveSheet.OLEObjects
If TypeName(obj.Object) = "OptionButton" Then
'do somethin
End If
Next obj

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)
 
Top