您好我目前有一个宏包,我作为一个插件制作,我想把它解决到所有PC的工作,我在添加工具栏中设置按钮布局时遇到了麻烦。
我试图将其设置为使图标以4 x 2的网格显示下面的标题。但是我不确定将样式设置为具有辅助行的代码。
这是其中一个按钮的示例。
Set fFormatting = oToolbar.Controls.Add(Type:=msoControlButton)
With fFormatting
.DescriptionText = "Format Active Sheet"
.Caption = "Format Leads"
.OnAction = "Button1"
.Style = msoButtonIconAndCaptionBelow
.FaceId = 112
End With