Adding Text to Toolbar Buttons

[Guest]

I know how to change the toolbar buttons (individually) to display Image and
Text. Is there a way to change all of the buttons on the standard toolbar
globally (at the same time) to Image and Text?

Thank you!

 

[Jay Freedman]

I know how to change the toolbar buttons (individually) to display Image and
Text. Is there a way to change all of the buttons on the standard toolbar
globally (at the same time) to Image and Text?

Thank you!

Use a macro like this (choose the Style value you like):

Sub ButtonsWithLabels()
Dim btn As CommandBarControl
CustomizationContext = NormalTemplate
For Each btn In CommandBars("Standard").Controls
Select Case btn.Type
Case msoControlButton, _
msoControlButtonDropdown, _
msoControlButtonPopup
btn.Style = msoButtonIconAndCaptionBelow
Case Else
End Select
Next btn
End Sub

--
Regards,
Jay Freedman
Microsoft Word MVP
Email cannot be acknowledged; please post all follow-ups to the
newsgroup so all may benefit.

 

[Guest]

Very cool... Thank you it worked great! I was even able to alter the macro to
set them all back to Image only.

Thank you1