使用Excel VBA显示CommandBar按钮的标题

Question

我正在尝试使用Excel VBA向新的CommandBar（用于“加载项”选项卡）添加按钮。如果我使用FaceId，我可以将按钮放入功能区并可以显示图像，但我无法显示标题。有办法做到这一点吗？我是否必须使用图像？

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

    .Visible = True
End With

Answer 1

您需要按如下方式设置新按钮的样式属性：

    .Style = msoButtonIconAndCaption

该样式还有其他选项（例如msoButtonCaption）。您可以通过intellisense轻松查看列表。