Option Button open template false

[Ken Ivins]

I have a form template I have designed that will be printed occasionally to
fill in manually. I created some option buttons for this form and want it to
open every time with neither option chosen. I assume that if someone plays
with this and saves it as a template then this feature may get messed with
(users can do the darndest things).

So I thought I would like a macro that would check each option button upon
opening and uncheck it. I have done a lot of macro work in Access but not
much in Excel.
I tried

Private Sub Workbook_Open()
OptionButton59.Value = False
OptionButton60.Value = False
End Sub

But that did not work. It still opened with to Option 59 selected.

Any help would be greatly appreciated.

Thanks,
Ken Ivins

 

[Jim Cone]

Ken,

I've made some assumptions...

No VBA Form is being used.
Using option buttons from the "Forms" toolbar
Buttons are placed directly on a worksheet

Option buttons are designed to work as a group so that only one at
time has a value of true. You can have independent groups of option buttons
but they have to be separated using a Frame - also from the "Forms" toolbar.

Check boxes are not tied together and all or none can be true or false.

In any case, the following will work if Excel doesn't crash...
Worksheets("SheetName").Select
ActiveSheet.Shapes("Option Button 59").ControlFormat.Value = False
ActiveSheet.Shapes("Option Button 60").ControlFormat.Value = False

Regards,
Jim Cone
San Francisco, CA

----- Original Message -----
From: "Ken Ivins" <[email protected]>
Newsgroups: microsoft.public.excel.programming
Sent: Monday, September 20, 2004 8:02 AM
Subject: Option Button open template false