I like to protect an excel worksheet for opening with a password, but it have to work just after a while. So, i give a worksheet to some one, and he or she can use it for, example, a month. After a month a password is neccecary to open the sheet. How can i make that? I think it is possible with VBA.
Private Sub Workbook_Open()
Dim ExpiryDate As String
Dim pwd As String
pwd = "ABC"
ExpiryDate = "28/01/2019"
If Date > ExpiryDate Then
MsgBox "Password has expired", vbCritical, "Expired Password!"
If InputBox("Enter Password", "", "") <> pwd Then
'enter a close or repeat password routine here