Создать подменю в существующем меню в Excel Shared Add-in - PullRequest
1 голос
/ 22 апреля 2010

Я разрабатываю общую надстройку 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 Ответ

1 голос
/ 20 мая 2010

Вот краткий пример, чтобы помочь вам на вашем пути:

        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;
...