Password with VBA

[Volkof]

Hello
I want to set up a password when i am opening a workbook.
Let's say i open a workook and a form appears and I must enter a password to gain access.
In the form I must enter my id and my password to gain access.
Or anything similarly .
Thank you very much .

 

[VoG]

Try like this in the ThisWorkbook module

Private Sub Workbook_Open()
Dim s As String
s = InputBox("Enter password")
If s <> "Vladimir" Then Me.Close
End Sub