Share via

WritePassword Property [Excel 2003 VBA Language Reference]

  • Article

Returns or sets a String for the write password of a workbook. Read/write.

expression.WritePassword

expression Required. An expression that returns one of the objects in the Applies To list.

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 ">>**".

Applies to | Workbook Object