Password 属性

返回或设置密码，在打开指定的工作簿时必须提供该密码。String 类型，可读写。

expression   必需。该表达式返回“应用于”列表中的对象之一。

示例

在本示例中，Microsoft Excel 打开名为 Password.xls 的工作簿，设置它的密码，然后关闭该工作簿。本示例假定名为 Password.xls 的文件位于 C:\ 驱动器上。

Sub UsePassword()

    Dim wkbOne As Workbook

    Set wkbOne = Application.Workbooks.Open("C:\Password.xls")

    wkbOne.Password = "secret"
    wkbOne.Close

End Sub

注意   Password 属性可读并返回 “********”。