WriteReserved 属性

如果指定工作簿是写保护的，则该值为 True。Boolean 类型，只读。

说明

使用 SaveAs 方法可对属性进行设置。

示例

如果活动工作簿是写保护的，本示例将显示一则消息，其中包含将该工作簿以写保护方式保存的用户的名称。

With ActiveWorkbook
    If .WriteReserved = True Then
        MsgBox "Please contact " & .WriteReservedBy & Chr(13) & _
            " if you need to insert data in this workbook."
    End If
End With