Могет через менюшку на панели инструментов (порядковый номер иконки)?
Stepler ^{(щёлк-щёлк!!)}

Пардон - забыл написать типа пример:
CommandBars("Шрифтики").Controls.Add Type:=msoControlButton, ID:=114, _
Before:=3
Stepler ^{(щёлк-щёлк!!)}

big-dukeчерез find найти кнопку и сделать что-то типа
Application.CommandBars( 3 ).Controls( 1 ).Execute
Но имей ввиду, что у тебя адрес могет быть другой
>big-duke , ничего,что я пояснил ???

Точнее:
Selection.Find.Application.CommandBars("Шрифтики").Controls("&Курсив").Execute
Но у меня панель называется "Шрифтики", а у тебя - "Стандартная" ???
Stepler ^{(щёлк-щёлк!!)}