Increment Variable from User Form Selection

[jonhfl]

Hi,

I have a workbook that when opened displays a user form with two buttons. Each button goes to a different worksheet. Basically it gives the option of which worksheet you want to start with. I have a MsgBox that displays with instructions after you make your selection. Then on the sheet you open there is a button to go to the other sheet. I am trying to have that button prompt a MsgBox if the other sheet has not yet been selected. I can get excel to recognize the sheet has been selected once it is toggled to from the other sheet however when I go back to the first sheet it thinks it is the first time. I tried adding code to the form button on_click to increment an occurance variable I have but that does not seem to store whe nthe form is unloaded. Also the occurance variable is declared to the workbook so not within a Sub. Any help?

[davegugg]

Did you try declaring the occurance variable as Global?

[jonhfl]

I believe so. It is declared above any sub procedure in the workbook. Is that what you mean?

[davegugg]

It should say:

Please Login or Register  to view this content.

in a standard module.

[jonhfl]

Here is the code, I will try to break it out so you can see the steps....

Please Login or Register  to view this content.

So it works perfect except for the fact that the one you select in the form will prompt again when navigated to via the macro. But it will only do it one more time.

[jonhfl]

I tried changing where I have

Please Login or Register  to view this content.

to

Please Login or Register  to view this content.

Same results

[davegugg]

Before I can continue to help you, you are going to need to edit your above two posts to include code tags. See the forum rules.

But: You would want to keep the same variable type: integer, not string.

[jonhfl]

Sorry I did keep them as Integers. Still does not seem to recognize the increase to the variable from the form.

[jonhfl]

I got it to work.... I replaced the code with the +1 to call a sub routine to do the increment and it worked.

Please Login or Register  to view this content.

I had tried that earlier but I think it was the global that solved it.

Thank you for the help.

[davegugg]

I think you should remove the message boxes from inside the RunComp_Click() and
RunReg_Click() procedures. Does that work?

[jonhfl]

I guess I could actually just remove everything from teh _Click and just call the Sub? That would clean it up a bit and I think do the same thing. It is working now so I will do a bit of clean up.