如果图形处于保护状态,则该值为 True。Boolean 类型,只读。
如果 sheet1 中的图形处于保护状态,则本示例显示一个消息框。
If Worksheets("Sheet1").ProtectDrawingObjects = True Then MsgBox "The shapes on Sheet1 are protected." End If