Я пытаюсь создать очень маленький макрос для изменения формата (размера текста и шрифта) в Powerpoint.
Я попытался использовать этот код, взятый из аналогичного вопроса на StackOverflow. Код работает, только когда выделенный текст находится в графике умного искусства. Я получаю сообщение об ошибке, в котором говорится, что This Member can only be accessed for a single shape.
With ActiveWindow.Selection.TextRange.Font
.Name = "Courier New"
.Bold = msoTrue
End With
Есть идеи?
Спасибо.