Я немного работаю в Powerpoint 2010, и мне очень нужна комбинация клавиш, чтобы активировать перенос текста для выбранной фигуры.
Есть ли сочетание клавиш?
Я немного работаю в Powerpoint 2010, и мне очень нужна комбинация клавиш, чтобы активировать перенос текста для выбранной фигуры.
Есть ли сочетание клавиш?
Вы можете создать макрос PowerPoint, используя следующий код, и добавить его на панель быстрого доступа:
Sub ToggleShapeTextWrap()
Dim oShp As Shape
If ActiveWindow.Selection.Type <> ppSelectionShapes Then
MsgBox "Please select some shapes!", vbExclamation, "Shape Selection"
Else
For Each oShp In ActiveWindow.Selection.ShapeRange
If oShp.HasTextFrame Then
oShp.TextFrame.WordWrap = Not oShp.TextFrame.WordWrap
End If
Next oShp
End If
End Sub
В отличие от других приложений Office, я не думаю, что вы можете определить пользовательские сочетания клавиш для макросов PowerPoint без надстройки, такой как эта, поэтому добавление кнопки для макроса в QAT или на ленту будет лучшим способом для быстрого доступа.
Выберите форму, затем
alt, h, o, Pg вниз, стрелка вверх, alt - w, Enter
Клавиши, разделенные запятой, нажимаются одна за другой, одновременно нажимаются alt - w .