Password 属性

返回或设置 String 类型值，该值代表要打开指定演示文稿必须提供的密码。可读写。

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

示例

本示例打开 Earnings.ppt，为其设置密码，然后关闭该演示文稿。

Sub SetPassword()
    With Presentations.Open(FileName:="C:\My Documents\Earnings.ppt")
        .Password = "why"
        .Save
        .Close
    End With
End Sub