Добавление пункта в контекстное меню excel

АрхивОфис

Продолжаем серию обзоров о полезных плагинах для популярных приложений из комплекта Microsoft Office.

Неспешно продолжаем наши повествования о полезных расширениях для приложений из комплекта Microsoft Office. Рассматриваемый сегодня плагин «Настройка контекстного меню» предназначен для модификации контекстного меню ячейки в табличном редакторе Excel.

С помощью этого плагина можно дополнить стандартное контекстное меню любыми пунктами для работы в текущей сессии Excel, либо сохранить сделанные изменения для постоянного использования. Программа также позволяет восстановить вид контекстного меню по умолчанию.

После распаковки архива необходимо скопировать файл надстройки Rightbtn.xla в папку Microsoft Office, в которой находятся файлы надстроек Excel (например, C:Program FilesMicrosoft OfficeOfficeLibrary). Файл справки Rightbtn.hlp необходимо скопировать в папку справочных файлов Windows (как правило, это C:WindowsHelp).

Добавление плагина к Excel

Теперь необходимо подключить надстройку. Для этого после запуска Excel переходим в диалоговое окно «Надстройки», выбрав команду «Сервис -> Надстройки». В открывшемся окне отмечаем строку Rightbtn. Теперь в табличном редакторе появится новая панель «Контекстное меню» с двумя кнопками: одна вызывает диалог настройки, вторая удаляет все добавленные команды из контекстного меню.

Для добавления новых пунктов контекстного меню воспользуйтесь кнопкой «Настройка контекстного меню», расположенной на новой панели инструментов. В результате, откроется одноименное окно. В нем и следует настроить контекстное меню ячейки Excel. В новое меню можно добавить пункты трех типов (им соответствуют вкладки окна «Настройка контекстного меню»): обычные меню, инструменты и всплывающие меню.

В верхнем списке на каждой из этих вкладок выбирается группа или панель инструментов, а ниже указывается конкретный пункт меню, который необходимо добавить в контекстное меню. Для включения выделенного пункта в контекстное меню предназначена кнопка «Добавить». Пункт «Сбросить» позволяет удалить все добавленные пункты. В меню можно добавить разделительную линию, для этого предназначена кнопка «Добавить разделитель».

Настройка контекстного меню

Переключатель в нижней части окна позволяет сохранить созданное контекстное меню для следующих сеансов работы с редактором. Для этого необходимо снять установленную по умолчанию пометку с переключателя «Сохранять новые команды только для текущей сессии Excel».

После завершения настройки необходимо нажать «ОК», и в контекстном меню ячейки будут отображены все добавленные пункты.

Excel gives you access to a Context menu that is loaded with options whenever you right-click on a cell. This menu gives you the ability to perform a wide variety of tasks. It’s possible that you should add some features to the Context menu, especially if those features are ones that you use frequently. Unfortunately, you cannot change Context menus in the same way that you can edit other menus, which is by selecting Customize from the Tools menu. This is the only way to edit Context menus. The Cell menu is the most frequent form of the Context Menu that most people are familiar with and make use of.

The purpose of this article is to discuss the process of adding a button for custom code to the right-click menu in Excel using VBA code.

Add Custom Button to The Context Menu with VBA Code

Step 1

Open an excel sheet and Press Alt and F11 key (Alt+F11) to open Microsoft Visual Basic for Application windows. See the below given image.

Step 2

After that, select Insert > Module from the menu bar to bring up the popup Module window. See the below given image.

Step 3

After opening the Module Window, then type the following VBA code in it.

Sub AddItemToContextMenu()
   Dim cmdNew As CommandBarButton
   Set cmdNew = CommandBars("cell").Controls.Add
   
   With cmdNew
      .Caption = "My Button"
      .OnAction = "MyButton"
      .BeginGroup = True
   End With
End Sub

After adding the VBA code, Press F5 or click on Run tab. Then Press the Alt + Q keys to exit the Microsoft Visual Basic for Applications window.

The only thing you need to do is update is .Caption property to any menu text you want to use, and Adjust the .OnAction property so that it points to the desired command or macro to be executed.

You can use the following macro if at a later time you decide that you no longer desire the menu option.

Sub RemoveContextMenuItem()
   On Error Resume Next
   CommandBars("cell").Controls("My Button").Delete
End Sub

To make advantage of this, replace the text that says «My Button» with the text that you used in .Caption property of the macro written above. In this particular macro, the On Error statement is present simply in case the designated macro item had not been included in the earlier additions.

Now select any cell and right click there You will see “My Button” button added to the list.