excel - 保护形状，以便用户可以修改但不能删除

Question

我有一个工作簿，其中包含一些我不希望用户轻易删除的形状。它们与索引相关联，索引号与其他所有内容相关联。

但是，用户需要四处移动形状并调整它们的大小。

如何在sheet上设置保护，允许用户修改形状但不能删除形状？

在 VBA 中执行此操作的能力也很有用，因为我的一些宏取消保护然后保护单元格。

Answer 1

这是不可能的。

您可以使用此代码锁定工作簿中的所有形状

Private Sub Workbook_Open()
  ActiveSheet.Protect Password:="test", userinterfaceonly:=True
  Dim shape As shape
  For Each shape In ActiveSheet.Shapes
    shape.Locked = True
  Next
End Sub

或者您在 dot.net 中为 Excel 构建一个插件。此博客描述了如何对形状执行此操作，您可以在其中使用事件来覆盖删除。

create excel events for shapes或者 Microsoft excel shape events