Отображение заголовка для кнопки CommandBar в Excel VBA - PullRequest
2 голосов
/ 16 марта 2009

Я пытаюсь добавить кнопку в новую панель команд (для вкладки надстройки) в Excel VBA. Я могу вставить кнопку в ленту и получить изображение для нее, если я использую FaceId, но не могу отобразить заголовок. Есть ли способ сделать это? Нужно ли мне вместо этого использовать изображение?

With Application.CommandBars.Add("Open Forms")
    With .Controls.Add(msoControlButton)
        .OnAction = "ThisWorkbook.FunctionFunction"
        .Caption = "Call the Function"
    End With

    .Visible = True
End With

1 Ответ

2 голосов
/ 27 декабря 2009

Вам необходимо установить свойство стиля новой кнопки следующим образом:

    .Style = msoButtonIconAndCaption

Существуют и другие варианты стиля (например, msoButtonCaption). Вы можете легко увидеть список через intellisense.

...