Even cartographers need PowerPoint now and then. But, as strange as it may seem in a globalized society, its developpers haven’t considered necessary to allow the user to determine a language for a whole presentation. If you happen to have the French or the German version of the software, well, you’re stuck with it and good luck with preparing your slides in English: every new slide will systematically apply French or German to any new box. Either you manually correct each and everyone of them or the auto-corrector will underline your spelling, perhaps even chew it up altogether if you have ‘correct as you type’ active.
The only way to go around this is a macro (!) I’ve got from Chocotooth’s blog:
Sub SetLangUS() Dim scount, j, k, fcount scount = ActivePresentation.Slides.Count For j = 1 To scount fcount = ActivePresentation.Slides(j).Shapes.Count For k = 1 To fcount 'change all shapes: If ActivePresentation.Slides(j).Shapes(k).HasTextFrame Then ActivePresentation.Slides(j).Shapes(k).TextFrame _ .TextRange.LanguageID = msoLanguageIDEnglishUS End If Next k fcount = ActivePresentation.Slides(j).NotesPage.Shapes.Count For k = 1 To fcount 'change all shapes: If ActivePresentation.Slides(j).NotesPage.Shapes(k).HasTextFrame Then ActivePresentation.Slides(j).NotesPage.Shapes(k).TextFrame _ .TextRange.LanguageID = msoLanguageIDEnglishUS End If Next k Next j End Sub
What should you do with this? Click the Visual Basic button on the ‘Developer’ tab:
Insert a new module by right-clicking on ‘VBAProject’ in the left navigation pane:
This opens a new window. Paste the code into it. And execute it with tha ‘play’ button:
All text boxes have set to English/US. You can save this code for later use in a file with .bas extension. Dear Microsoft, if you could offer a less tedious solution than this by simply integrating the language-switching feature in PowerPoint, many thanks in advance…



