Run Macro only if data entered in cell is correct

[Manus99]

Hello,

I have a workbook with 3 spreadsheets with the following labels. The first is the "opening" sheet, the second is "Private", the third is "Public"

The opening sheet is nothing but 2 buttons. You can enter either public or private. I have macros for each button. If you click the private button you see all tabs. If you click the public button you only see the "public" worksheet. What I want to do is have my private macro run, only if a correct password is entered into a cell B11.

Is there a way to have it so if you click private button with the wrong password, or nothing in cell B11 then you get an error message.... but if you enter the correct password then the macro runs?

Thanks

 

[lenze]

Why not use an InputBox?

rspn = InputBox ("Enter Password")
If rspn <> "password" Then Exit Sub

lenze

 

[Manus99]

That sounds like a good approach to my issue... however I am unfamiliar with input boxes. Where can I find that? Thanks.

 

[lenze]

I assume you have a macro for your "Private" button on the "opening" sheet. Just make the lines I posted the first 2 lines of code. Change "password" to whatever you desire.

See the VBA help file for detailed info.

lenze

 

[Manus99]

Lenze that is perfect! Thank you so much for your help... and I learned something completely new that is easy.

Thanks again!

 

[lenze]

You might want to include a message for them. Something like

rspn = InputBox ("Enter Password")
If rspn <> "password" Then 
      MsgBox "Wrong password" 
      Exit Sub
End If

lenze