excel - 阻止图表删除

Question

我有一个图表，我希望用户不要删除。但是，如果他愿意，我想给他移动或调整大小的选项，所以我认为，该选项 locked in properties 在这里不合适(我也使用 secure worksheet)。

这里是否有可能使代码在用户单击 Del 时起作用？在键盘上，然后是一些 msgBox出现错误信息，显示此图表不可删除，然后放弃此删除操作？

Answer 1

防不胜防Chart删除，同时使其可以移动

有以下两个选项，*sorta* 可以实现您想要的:

启用工作表保护 ( Review -> Protect Sheet ) 这将实现以下目标:

防止图表被删除

不幸的是，还防止图表被移动

使用Application.OnKey检测按下 Delete

Private Sub Worksheet_Activate()
    Application.OnKey "{DELETE}", "PreventDeletion"
End Sub

Private Sub PreventDeletion()
    MsgBox ("Deletion not allowed in this worksheet")
End Sub

这允许移动图表

不幸的是，只会产生删除保护的错觉。如果用户使用 mouse2 并选择删除选项，他仍然可以使用它。这只会中断按 Delete

这也会使整个工作表的 Delete 过时，这可能很烦人(对用户而言)

这两种选择都不理想，尽管我个人更喜欢第一种，因为完全阻止使用 Delete 势必会惹恼您的用户。