Password userform talk to other userforms

**amotto11** · 03-21-2013, 10:02 AM

Hi All,

I have what i hope to be a pretty simple problem that i just cannot think through.

I have a userform that allows a user to edit a column of cells. When the user clicks RUN, I have code to check that the userform is correctly filled. Then this:

Please Login or Register  to view this content.

This as you can tell is my password userform. On that userform is just a label, text box(which changes the characters to *), okay button, and the X at the top right of the form. Currently i have this code in the password userform:

Please Login or Register  to view this content.

It works good to deny my users when they click the run button if they have not entered in the correct password, it also works if they enter in the correct password. If they enter in the correct password, then i continue on with my add userform which edits the column.

The problem that i am having is that when the user clicks the X at the top right of the password userform it just closes the userform and continues on with the editing of columns, just like the password was correct. Obviously this is not what i want, i would like for when the X is clicked it would unload the userform and Exit Sub in my edit userform so the user cannot edit. I am not sure how to do this. I believe i should be using something in the Password Terminate subroutine, but i am not sure. Any help is greatly appretiated. Thanks.

**amotto11** · 03-21-2013, 11:05 AM

I figured it out for anyone in the future. You will need to set a public variable in the "This Workbook" sheet. This is what i used

Please Login or Register  to view this content.

Then on your password terminate event your code would be

Please Login or Register  to view this content.

and on every other even in your password in order for a successful entry to work there has to be some place for

Please Login or Register  to view this content.

Then on every userform that calls the password userform you need to put this code

Please Login or Register  to view this content.

**cytop** · 03-21-2013, 11:13 AM

Somethng simpler.. Use the CloseMode parameter of the UserForm_QueryUnloadf event handler...

Please Login or Register  to view this content.

The CloseMode is 0 if the red Close button in the title is cancelled, 1 if being unloaded in code and 2 (I think) if Windows is closing. Set the Cancel parameter to True to cancel the close.

**amotto11** · 03-21-2013, 11:40 AM

Cytop,

That did not work how i was wanting, it still doesn't close my password userform, it just poped up a message that says "Close Canceled". I want them to be able to close the password userform, just if they do then don't run the edit code. My solution did not work as planned so i am opening the post up again.

Can you build on your sub to make it work for me?

Thanks

**amotto11** · 03-21-2013, 11:44 AM

I thought that creating a public variable would work, but i have never created one before so i was unsure of where to define if, so i did it in ThisWorkbook. which is not working for me. do i need to define it above each of my userforms, or what?

**amotto11** · 03-21-2013, 12:12 PM

I think i figured it out. I used my solution and instead of using a public variable in the ThisWorkbook, i used a global variable in a new blank module, and i didn't unload the password userform after i set Exiting, i hid the password userform instead. I believe this should work for me, but if you have a simpler solution, because i have to do an if statement on all of my userform going my route, i would be glad to heat it. Thanks for all the help