Контекстное меню - скрыть все кнопки и добавьте только мои кнопки
-
02-01-2020 - |
Вопрос
Я ищу способ скрыть все кнопки из контекстного меню Excel и просто оставьте мои кнопки, которые я создал.
Как я могу это сделать?
Решение
Я нашел способ сделать это, когда у меня такая же проблема ..
Если вы хотите удалить любой элемент
Sub RemoveItems()
Application.CommandBars("Cell").Controls("Insert...").Delete
Application.CommandBars("Cell").Controls("Cut").Delete
Application.CommandBars("Cell").Controls("Copy").Delete
End Sub
.
или если вы хотите удалить все элементы, то
Sub DeleteAll()
Set CtrlMenu = Application.CommandBars("Cell")
For Each Item In CtrlMenu.Controls
Item.Delete
Next
End Sub
.
Если вы хотите восстановить снова
Sub ResetMenu()
Application.CommandBars("Cell").Reset
End Sub
. Не связан с StackOverflow