Hi,

I'm using this macro :
Value = Application.InputBox(Prompt:="Insert password")
If Value = "password" Then
Application.Run macro:="enter"
Else
Application.Run macro:="ignore"

While entering the password I would like the allready
inserted digits to be shown as ***

Is this possible ?

Thanks !
Tom

Tom,

You can't do this with a standard InputBox. If you really need this
capability, you need to create a user containing a TextBox control whose
PasswordChar property is set to *.


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
www.cpearson.com




"tom" wrote in message
...
Hi,

I'm using this macro :
Value = Application.InputBox(Prompt:="Insert password")
If Value = "password" Then
Application.Run macro:="enter"
Else
Application.Run macro:="ignore"

While entering the password I would like the allready
inserted digits to be shown as ***

Is this possible ?

Thanks !
Tom

Tom,

If you use a userform for the password, the textbox control has a
PasswordChar property, so it will throw this character up instead of what is
typed.

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)

"tom" wrote in message
...
Hi,

I'm using this macro :
Value = Application.InputBox(Prompt:="Insert password")
If Value = "password" Then
Application.Run macro:="enter"
Else
Application.Run macro:="ignore"

While entering the password I would like the allready
inserted digits to be shown as ***

Is this possible ?

Thanks !
Tom

The inputbox doesn't support this. You can create a userform with a
textbox. The textbox has a passwordchar property that you can set to an *

--
Regards,
Tom Ogilvy

"tom" wrote in message
...
Hi,

I'm using this macro :
Value = Application.InputBox(Prompt:="Insert password")
If Value = "password" Then
Application.Run macro:="enter"
Else
Application.Run macro:="ignore"

While entering the password I would like the allready
inserted digits to be shown as ***

Is this possible ?

Thanks !
Tom