Solved: Setting using Personal workbook to store settings

[Djblois]

Ken,

It is working great but now I am trying to use the settings to not show a user form if the user never wants to. Here is the code I have tested:

[VBA]If GetSetting("Business Reporting Today", "DetailTab", "Dont Show") = True Then
Organize.Hide
End If[/VBA]

This would be great if I can get this to work

[mdmackillop]

You can set the frame tag value using the option buttons, then you just have one value to check. You can also set the initial optionbutton values based on a fixed or retrieved value. eg
[VBA]Private Sub UserForm_Initialize()
x = 3
Me.Controls("OptionButton" & x) = True
End Sub

Private Sub CommandButton1_Click()
MsgBox Frame1.Tag
End Sub

Private Sub OptionButton1_Click()
If OptionButton1 Then Frame1.Tag = 1
End Sub
Private Sub OptionButton2_Click()
If OptionButton2 Then Frame1.Tag = 2
End Sub
Private Sub OptionButton3_Click()
If OptionButton3 Then Frame1.Tag = 3
End Sub

[/VBA]

[Djblois]

Mdmack that looks promising to cut down on typing but how can I use that with the registry settings? Also, how can I let my users set options that would affect code directly? Ex:

I want to let my users set it so a userform will not show. Here is the code I tested:

[VBA]

If GetSetting("Business Reporting Today", "DetailTab", "Dont Show") = True Then
Organize.Hide
End If

[/VBA]

I am running that code in the initialize for that form but it still shows. However I do not get an error.

[mdmackillop]

What code is used to open the userform?

[Djblois]

[VBA]organize.show[/VBA]

I originally want to show the code because it loads the settings that the user wants and then it hides the form.

[mdmackillop]

As far as I can see Hide does nothing and Visible is not valid. You could set Height and Width to 0, but that leaves the Caption bar.
I've no knowledge what you are using the settings for, what applies to the form, or the workbook, or the interaction between them, or really what you are trying to achieve.

[Djblois]

I have a form that pops up for what invoices the user wants to delete and a few other options. However certain users will want to set these defaults and never see the form again but some people might always want to see the form. Also, hide I use in other situations which hides the form from sight.

[Charlize]

Before showing the form, check the value of "Dont Show".
[VBA]If GetSetting("Business Reporting Today", "DetailTab", "Dont Show") <> True Then
Organize.show
End If [/VBA]Charlize

[Djblois]

Thank you Charlize,

That is how I am doing it now, I just have to change the logic a little.

[Djblois]

One last thing I am trying to do is at a later time I want to save one setting equal to another setting. To explain, I want to read the first setting and then set the second setting equal to the first setting. Is this possible?

[Djblois]

I still can't find a way to mark a thread unsolved. Can someone do it for me? thank you

[lucas]

Thread tools....edit thread
edit the title and save changes

[Djblois]

Lucas,

Thank you for your help but I don't have an edit thread under thread tools

[lucas]

Solved removed from title....

[Djblois]

thank you

[Djblois]

I am just reposting this to move it to the bottom:

One last thing I am trying to do is at a later time I want to save one setting equal to another setting. To explain, I want to read the first setting and then set the second setting equal to the first setting. Is this possible?

The reason I want to do this is My users will have their own defaults but then if one day they need to run a lot of reports with the same options (That are different than their defaults), I don't want them to have to go into settings to change their defaults and then when they are done go back to change them into their normal defaults. I am adding a check box to the bottem to reuse the settings they have chosen on the form and then to go back to their defaults they just uncheck it.

[Djblois]

Has anyone read this?

[Ken Puls]

So... what you're trying to do is create an "options" screen that your users can go to so that they can set defaults, but then not be bothered with seeing them unless they want to change them? Is that right?

You could use a multipage control for that. I usually would put a button on the main page for "Options" that takes you to page 2. Add a button to page 2 labelled "Home" or something that takes you back to page one. Then hide the tabs at design time. Can work quite slick.

Is that the kind of thing you meant?

[Djblois]

No, but close Ken. The options they go to the help drop down and then Options to set the options. But now if they are running reports that all have the same options I want to include a check box on the bottom of the screen that they can check and it will save them for the next time the form opens up but if it is unchecked it will load the default from the settings page.

[Ken Puls]

Where is the help dropdown, exactly? Is this the help menu, or on your userform. I assume that you've got this set to store the registry settings already?

As for reading the stuff and setting the defaults, you'd set your defaults in the Userform_Intialize event. Or did I miss something?