Создать подменю в существующем меню в Excel Shared Add-in
Я разрабатываю совместную надстройку Excel, меню которой называется Custom
который создается с помощью макросов Excel. Теперь я хочу создать подменю под Custom
меню с помощью Csharp Shared Add -in. Я использую приведенный ниже код для этого, но без помощи
oStandardBar = oCommandBars["Custom"];
oCmdBarCtrl = oStandardBar.Controls.Add(MsoControlType.msoControlPopup, Type.Missing, Type.Missing, Type.Missing, true);
oCmdBarCtrl.Visible = false;
oCmdBarCtrl.Caption = "Sub Menu1";
Но это не создает подменю, где, как будто я даю "Помощь" вместо Custom, я получаю созданное меню. какая-нибудь работа для этого?
1 ответ
Решение
Вот быстрый пример, чтобы помочь вам на вашем пути:
var m_toolbar = this.Application.CommandBars.Add("WpfAddIn",
Office.MsoBarPosition.msoBarTop, false, true);
var mainMenu = (Office.CommandBarPopup)m_toolbar.Controls
.Add(Office.MsoControlType.msoControlPopup,
missing, missing, missing, true);
mainMenu.Caption = "Main menu";
var subMenu1 = (Office.CommandBarButton)mainMenu.Controls
.Add(Office.MsoControlType.msoControlButton,
missing, missing, missing, true);
subMenu1.Caption = "Sub menu 1";
subMenu1.FaceId = 1958;
var subMenu2 = (Office.CommandBarPopup)mainMenu.Controls
.Add(Office.MsoControlType.msoControlPopup,
missing, missing, missing, true);
subMenu2.BeginGroup = true;
subMenu2.Caption = "Sub menu 2";
var subMenu2Button = (Office.CommandBarButton)subMenu2.Controls
.Add(Office.MsoControlType.msoControlButton,
missing, missing, missing, true);
subMenu2Button.Caption = "Sub menu 1";
subMenu2Button.FaceId = 1958;
m_toolbar.Visible = true;