Excel.Workbook.WritePassword.md

title	Workbook.WritePassword property (Excel)
keywords	vbaxl10.chm199210
f1_keywords	vbaxl10.chm199210
api_name	Excel.Workbook.WritePassword
ms.assetid	ac89063e-6ef5-f7c5-abb0-4e6ef1c5fd05
ms.date	05/29/2019
ms.localizationpriority	medium

Workbook.WritePassword property (Excel)

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

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

[!includeSupport and feedback]