HasPassword Property Example
This example sets the password "kittycat" for the active document and then displays a confirmation message.
ActiveDocument.Password = "kittycat" If ActiveDocument.HasPassword = True Then _ MsgBox "The password is set."