OptionButton1 = False

[Abco_B]

Bestaat er een VBA commando dat alle optionbuttons in een werkblad de waarde false geeft ?

Abco

 

[jheesterbeek]

met dank aan:
http://groups.google.nl/group/microsoft.public.de.excel

Sub AlleOptionButton()
Dim objCtrl As OLEObject
For Each objCtrl In ActiveSheet.OLEObjects
objCtrl.Object.Value = False
Next objCtrl
End Sub

 

[Abco_B]

Bedankt voor je reactie !

Abco

 

[Meurik]

alle optionbuttons value = False

In mijn excelformulier bestaan een aanzienlijk aantal "OptionButtons Objecten" en "Checkbox objecten" die ik met 1 klik op een commandButton allemaal "false" wil zetten i.p.v. elk object apart te moeten vermelden. Ik heb onderstaande code teruggevonden in dit forum maar helaas blijkt dit niet te werken als ik dit koppel aan mijn commandbutton

Private Sub CommandButton1_Click()
Dim objCtrl As OLEObject
For Each objCtrl In ActiveSheet.OLEObjects
objCtrl.Object.Value = False
Next objCtrl
End Sub

Blijkbaar loop het mis ter hoogte van de opdrachtregel objCtrl.Object.Value=False. Weet iemand wat ik fout doe ?