Я немного работаю в Powerpoint 2010, и мне очень нужна комбинация клавиш, чтобы активировать перенос текста для выбранной фигуры.

Есть ли сочетание клавиш?

2 ответа2

0

Вы можете создать макрос 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 или на ленту будет лучшим способом для быстрого доступа.

0

Выберите форму, затем

alt, h, o, Pg вниз, стрелка вверх, alt - w, Enter

Клавиши, разделенные запятой, нажимаются одна за другой, одновременно нажимаются alt - w .

Всё ещё ищете ответ? Посмотрите другие вопросы с метками .