Workbook.WritePassword Property

Syntax

expression.WritePassword

expression A variable that represents a Workbook object.

Example

In this example, if the active workbook is not protected against saving changes, Microsoft Excel sets the password to a string as the write password for the active workbook.

Sub UseWritePassword() Dim strPassword As String strPassword = InputBox ("Enter the password") ' Set password to a string if allowed. If ActiveWorkbook.WriteReserved = False Then ActiveWorkbook.WritePassword = strPassword End If End Sub

Note
The WritePassword property is readable and returns ">>**".

See also:

• Workbook Object
• Workbook Object Members