Вам нужно немного VBA, чтобы достичь этого. Нажмите Alt+, F11чтобы открыть редактор VBA, выберите меню Вставить> Модуль и вставьте следующий код
Sub ResetLeftToRight() Dim oSh As Shape Dim oSl As Slide ' make sure slide sorter reads left to right ActivePresentation.LayoutDirection = ppDirectionLeftToRight ' then fix each of the text boxes For Each oSl In ActivePresentation.Slides For Each oSh In oSl.Shapes On Error Resume Next If oSh.HasTextFrame Then If oSh.TextFrame.HasText Then WIth oSh.TextFrame.TextRange.ParagraphFormat .TextDirection = ppDirectionLeftToRight End With End If End If Next ' shape Next ' slide End Sub После всех нажмите, F5чтобы запустить.
Сценарий выше сбрасывает направление текста каждого текстового поля. Он также сбрасывает интерфейс, если он в настоящее время справа налево, как это
