Даже картографы нужно PowerPoint сейчас и потом. Но, как ни странно это может показаться в глобализованном обществе, его разработчиков, не считается необходимым, чтобы позволить пользователю определить язык для всей презентации. Если вам посчастливилось иметь французской или немецкой версии программного обеспечения, ну, вы застряли с ним и удачи в подготовке слайды на английском языке: каждый новый слайд будет систематически применять французский или немецкий для любого нового окна. Либо вы вручную исправить всех и каждого из них или авто-корректор будет подчеркивать вашу орфографию, может быть, даже жевать ее в целом, если вы "исправить, как вы типа« активный.
Единственный способ обойти это макрос, я получил от (!) блог Chocotooth в :
Под SetLangUS () Dim scount, J, K, fcount scount = ActivePresentation.Slides.Count scount Для = 1 для scount fcount = ActivePresentation.Slides (J). Shapes.Count fcount 'change all shapes: Для к = 1, чтобы изменить fcount "все формы: Если ActivePresentation.Slides (J). Формы (к). Тогда HasTextFrame ActivePresentation.Slides (J). Формы (к). TextFrame _ . TextRange.LanguageID = msoLanguageIDEnglishUS End If Далее к fcount = ActivePresentation.Slides (J). NotesPage.Shapes.Count fcount 'change all shapes: Для к = 1, чтобы изменить fcount "все формы: Если ActivePresentation.Slides (J). NotesPage.Shapes (к). Тогда HasTextFrame ActivePresentation.Slides (J). NotesPage.Shapes (к). TextFrame _ . TextRange.LanguageID = msoLanguageIDEnglishUS End If Далее к Далее у End Sub
Что делать с этим? Нажмите кнопку Visual Basic на вкладке "Разработчик":
Вставьте новый модуль, щелкнув правой кнопкой мыши на "VBAProject в левой навигационной панели:
Откроется новое окно. Вставьте этот код в нем. И выполнить его с помощью кнопки "играть" Tha:
Все текстовые поля создали на английский / США. Вы можете сохранить этот код для последующего использования в файле с расширением. Бас расширение. Уважаемые Microsoft, если бы вы могли предложить менее утомительным, чем это решение просто интеграции языка переключение функций в PowerPoint, большое спасибо заранее ...



