Как привязать макрос к контекстному меню
Хотите связать один из ваших макросов с новой командой в контекстном меню? Это делает вызов макроса особенно простым для пользователей: просто щелкните ячейку правой кнопкой мыши, и контекстное меню станет доступным, как показано на следующем рисунке:
Вы уже увидите новую команду в контекстном меню рисунка. Он называется «Мой новый порядок». Используйте следующий программный код для интеграции новой записи:
Sub ContextMenuErwiden ()
С помощью Application.CommandBars ("Cell"). Controls.Add
.Caption = "Моя новая команда"
.OnAction = "Макрос"
Конец с
Конец подписки
В присвоении значения свойству OnAction введите имя макроса, который должен быть связан с новым элементом меню.
Чтобы удалить новую запись из контекстного меню, используйте следующий программный код:
Sub ContextMenuLoeschen ()
Application.CommandBars ("Cell"). Controls (Application.CommandBars ("Cell"). Controls.Count) .Delete
Конец подписки
Макрос удаляет последнюю запись из контекстного меню. Поскольку новая запись добавляется сюда заранее, макрос удаляет эту запись из контекстного меню.
