قم بإنشاء قائمة فرعية في القائمة الموجودة في الإضافات المشتركة Excel

Question

أقوم بتطوير وظيفة إضافية مشتركة لـ Excel والتي تحتوي على القائمة Custom الذي يتم إنشاؤه باستخدام وحدات الماكرو Excel. الآن أريد إنشاء قائمة فرعية تحت Custom قائمة باستخدام CSHARP مشترك إضافة -in. أنا باستخدام الكود أدناه للقيام بذلك ولكن لا مساعدة

oStandardBar = oCommandBars["Custom"];
oCmdBarCtrl = oStandardBar.Controls.Add(MsoControlType.msoControlPopup, Type.Missing, Type.Missing, Type.Missing, true);
oCmdBarCtrl.Visible = false;
oCmdBarCtrl.Caption = "Sub Menu1";

لكنه لا ينشئ قائمة فرعية ، حيث أعطي "مساعدة" بدلاً من ذلك ، أقوم بإنشاء القائمة. أي عمل حول هذا؟

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