Solved: Password Message Box

[khalid79m]

 
Private Sub Workbook_Open() 
     
    x = InputBox("Please enter password", "Password needed!") 
    If x <> "Password" Then ActiveWorkbook.Close False 
     
End Sub 

I have a worksheet that has a form Button, once this button is clicked I want a pop up box to appear ..(this bit I can do )

the message box needs to be an input password box , with the charachters starred out

Can this be done ? Are there any tutorials on complex message boxes

[Bob Phillips]

No, you need to juse a custome form with a textbox that allows a passwordchar property.

[khalid79m]

This works a treat