onclick - 如何阻止幻灯片中的形状被编辑或删除？

Question

我是 vba 的新手，并试图onClickEvent在 PowerPoint 中创建类似的东西。

我想停止编辑和删除具有幻灯片标签的名为“xyz”的形状。

我试图创建一个事件来检测这个形状的选择，然后如果它被删除或编辑，如下所示；

If shape=”xyz” is the selected object then
Detect if {“DEL”} or {“BACKSPACE”} is pressed. Then AlertUser

AlertUser 类似于消息，然后撤消操作

Public Sub AlertUser()
    MsgBox "Tags cannot be edited. This tag will be reset now."
    Application.CommandBars.ExecuteMso "Undo"
End Sub

提前感谢您的帮助和建议