How to Mask Password in MsgBox ???

[JJFletcher]

Hi Everyone,

Need to mask the password in the Message Box popup... unable to find good examples...

Sub show_ribbon()

   ' Select the range of cells on the active worksheet.
Dim pw As String
pw = InputBox("Please enter password")
If pw <> "Password" Then
    MsgBox "Invalid password"
    Exit Sub
Else

Application.ExecuteExcel4Macro "show.toolbar(""Ribbon"", true)"

End If
End Sub

Any Thoughts???

Best Regards,

John