Options Button Resetting on File Close

[Heronz]

I have 45 questions that each has 9 option buttons to select from. Each option button returns a vlaue which is placed into a particular cell in another sheet.

What I want to do is re-set the option buttons to a particular button number on exit - so that each time you open the file it is set in a neutral state ready for the questions to be asked.

i have tried changing the settings in the properties tab for the options buttons but this does not hold after the initial selection is made.

Is there something else that I need to do - or do I need to put a code in the virtual basic part of the sheet to reset certain buttons ??

 

[MartinK]

Hello,
we would need to know more about how your options are grouped, what are the values, etc.
In general, this will set the Optionbutton1 to True when you close your workbook:

Private Sub Workbook_BeforeClose(Cancel As Boolean)
    Worksheets(1).OptionButton1 = True
End Sub

Martin

 

[Heronz]

Where you have

Worksheets (1) . ....

Do I put inside the brackets the name of the worksheet??

 

[MartinK]

No, index. You can also use:

Sheets(1) for the first sheet or Sheets("Yournamehere") for the name.

Edit,
Worksheets("nameHere") works also, sorry.

 

[Heronz]

Great thanks for that - I'll give that a try

 

[Heronz]

RAN INTO TROUBLE

It comes back with an error message -

ambiguous name detected: Workbook_BeforeClose

What does that mean?

 

[MartinK]

It means that you have two procedures with the same name.
In ThisWorkbook class module check that you have just one procedure with this name.
If you need both, combine the code into one.

 

[Heronz]

Thanks MartinK - works perfect, appreciate your help