Надстройка Excel Организовать группу BeginGroup - PullRequest
0 голосов
/ 27 января 2020

У меня есть простая надстройка Excel, которая использует старый интерфейс CommandBar, который создает вкладку надстроек.

Теперь имеется достаточно кнопок, чтобы было бы замечательно организовать их в группы.

Первая (в настоящее время только) группа использует:

With Application.CommandBars("Formatting").Controls.Add
  .Caption = "Caption 1"
  .Style = msoButtonCaption
  .OnAction = "Button1Pressed"  
End With

Это добавляет кнопку в группу "Команды панели инструментов" на вкладке Надстройки.

Я пробовал:

With Application.CommandBars("Formatting").Controls.Add
  .BeginGroup = True
  .Caption = "Caption 2"
  .Style = msoButtonCaption
  .OnAction = "Button2Pressed"  
End With

Несколько статей, в том числе Кнопки меню создания кода рекомендуют использовать BeginGroup.

Я пробовал другие имена, кроме "Форматирование", но без радости.

Кнопка всегда заканчивается командами панели инструментов на вкладке Надстройки.

Любая помощь будет принята с благодарностью.

...