Невозможно запустить макрос, чтобы перехватить ключ удаления - PullRequest
0 голосов
/ 08 июля 2019

Я пытаюсь перехватить клавишу DEL на диаграмме EXCEL, используя VBA, чтобы запретить пользователям удалять серии диаграмм вручную. Я адаптировал код из этой статьи

Клавиша удаления ловушки

следующим образом:

Private Sub Chart_Activate()
    Application.OnKey "{DELETE}", "Intercept_DelKey"
End Sub

Private Sub Chart_Deactivate()
    Application.OnKey "{DELETE}"
End Sub

Sub Intercept_DelKey()
    MsgBox "user just pressed delete"
End Sub

Однако, когда я нажимаю клавишу DEL, я получаю эту ошибку

Невозможно запустить макросы ***. Xlsm! Intercept_DelKey. Макрос может не быть доступны в этой книге или все макросы могут быть отключены.

Другие макросы запущены, поэтому проблема, вероятно, относится к области видимости? Я попытался объявить макрос как

Public Sub Intercept_DelKey()

но получите ту же проблему. Все предложения приветствуются - спасибо!

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...