software

Hi, I am using macro to display below password input box:
--------------------------------------------------------------------------
Sub open()
myPWD = Application.InputBox(quot;Password Protected! Please Enter Authorized
Password to Continue!quot;)
If myPWD = quot;123456quot; Then
Sheets(quot;S1quot;).Select
Else
MsgBox quot;Wrong Password! Bye!quot;
End If
End Sub
-------------------------------------------------------------------------
My question: It works fine, but when I type password it not show in *****
but display the number I type. How to change in asterik (*)

TQ
Param


Haven't tested this, suggest use the passwordchar property before
displaying the inputbox, eg

Application.inputbox.passwordchar=quot;*quot;

Regards
Mike--
Mikeopolo
------------------------------------------------------------------------
Mikeopolo's Profile: www.excelforum.com/member.php...oamp;userid=18570
View this thread: www.excelforum.com/showthread...hreadid=532504not working, or I dont know how to set the command. pls correct me.

Sub closescreentarget()
Application.InputBox.passwordchar = quot;*quot;
myPWD = Application.InputBox(quot;Password Protected! Please Enter Authorized
Password to Continue!quot;)
If myPWD = quot;ems97188quot; Then
Dim wbk As Workbook
Workbooks.Open ActiveWorkbook.Path amp; quot;\setup.xlsquot;
Else
MsgBox quot;Wrong Password! Bye!quot;
End If
End Subquot;Mikeopoloquot; wrote:

gt;
gt; Haven't tested this, suggest use the passwordchar property before
gt; displaying the inputbox, eg
gt;
gt; Application.inputbox.passwordchar=quot;*quot;
gt;
gt; Regards
gt; Mike
gt;
gt;
gt; --
gt; Mikeopolo
gt; ------------------------------------------------------------------------
gt; Mikeopolo's Profile: www.excelforum.com/member.php...oamp;userid=18570
gt; View this thread: www.excelforum.com/showthread...hreadid=532504
gt;
gt;