User Password On A Button - Encrypt Password

Hi,

Can someone tell me how to display a password a user enters in an input box associated with a button as xxxxx so that the actual password doesn't display as it is entered by user? Using code below.

Dim Pass As String
    Pass = Application.InputBox("Enter password")
    Select Case Pass
        Case "mypassword"
          'run code'
           
        Case Else
        MsgBox "Sorry - Incorrect Password", vbCritical
            Exit Sub
    End Select

Thank you much.
MB

Hello mab,

The InputBox doesn't have a setting for passwords, i.e. showing an asterisk for the actual character typed. You will need to use a VBA UserForm with a TextBox control. Set the TextBox control's PasswordChar to an asterisk (*). When the user types, the only char displayed will be the asterisk.

Hi mab
Using that same approach as Leith Ross mentioned, I have attached a sample workbook that may work for you. It uses a userform that looks like an input box.