保护 excel sheet 允许通过 VBA 代码插入图像

Question

我正在尝试保护允许插入图像的工作表。然后我学会了如何使用 VBA 代码保护工作表，但是不允许工作表插入图像。

当我手动保护 WorkSheet 时，我发现如果我选中选项“修改对象”，WorkSheet 允许插入图像。

现在，我正在搜索 Protect 方法的参数，然后我有以下代码：

With Sheets("Sheet1")
        .Protect Password:="password", DrawingObjects:=True, Contents:=False, Scenarios:=False
End With

我假设代码占用了参数DrawingObjects，应该允许插入图片，但是代码不能正常运行，WorkSheet被保护了，但是仍然不允许插入图片。

Answer 1

我相信您的代码保护 DrawingObjects，而不是允许它们被插入。我认为应该是 DrawingObjects:=False 才能让它起作用。

每当我对受保护的工作表使用 VBA 时，我首先取消保护它，在 VBA 中做任何我想做的事，然后重新应用保护。或者至少，删除特定的保护，然后重新应用它们。

Protect an excel sheet allowing the insertion of images via VBA code