personal commandbars
Is it possible to have icons on the personalized toolbars instead of "text"?
As in the following sample, how to replace the text "internet" under caption
with a small icon image "such as internet.bmp or gif or jpeg"
Set myControl =
Application.ActiveExplorer.CommandBars("ToolbarOL" ).Controls.Add(Type:=msoControlButton)
With myControl
.Caption = "internet"
.Visible = True
.OnAction = "GetOnline"
.Style = msoButtonCaption
End With
--
Thanks.
|