I created macro and only few people will use it. How change characters to
stars(on monitor) when somebody is writing password?

below Is macro code:

Private Sub CommandButton2_Click()

Dim z As String

z = InputBox("enter password", "password")

If z = "example" Then
UserForm1.Show
Else
Exit Sub

End If
End Sub

You can't change the password character in an Inputbox. But you could use a
textbox on a userform with that textbox's .passwordchar property.

wrote:

I created macro and only few people will use it. How change characters to
stars(on monitor) when somebody is writing password?

below Is macro code:

Private Sub CommandButton2_Click()

Dim z As String

z = InputBox("enter password", "password")

If z = "example" Then
UserForm1.Show
Else
Exit Sub

End If
End Sub

--

Dave Peterson