2010
05.02
05.02
When preparing a presentation for my Bachelor thesis on “Confabulation in the Wernicke-Korsakoff syndrome” I was really annoyed by Powerpoint. The presentation had to be written in Dutch, but for all new “text boxes” I created, the spell-check was set to English. At first, I tried to change the “Default language” of Powerpoint, but that wouldn’t do the trick. After googling for some time I found this nice macro that would set the “msoLanguage” language for all text elements in the presentation.
Follow these steps and you’ll be alright:
- Find the right msoLanguage code, for Dutch (msoLanguageIDDutch), for (US) English (msoLanguageIDEnglishUS)
- Create a new macro:
- Go to Tools, Macro, Visual Basic Editor
- Insert a new empty module by selecting Insert, Module
- Paste this code on the right panel and save the macro:
Option Explicit Public Sub ChangeSpellCheckingLanguage() Dim j As Integer, k As Integer, scount As Integer, fcount As Integer scount = ActivePresentation.Slides.Count For j = 1 To scount fcount = ActivePresentation.Slides(j).Shapes.Count For k = 1 To fcount If ActivePresentation.Slides(j).Shapes(k).HasTextFrame Then ActivePresentation.Slides(j).Shapes(k) _ .TextFrame.TextRange.LanguageID = msoLanguageIDEnglishAUS End If Next k Next j End Sub
- Execute the macro
References:
I’ve got the same problem. But my situation was worse in two times. I had to prepare presentation on Russian but with charts in English. My laptop was crazy red as well as my tutor. I wish I found your post before!!! But on the other hand I have found a very helpfull spell checkerin order to spell check my presentation on-line.
Thank you so much, you saved me a lot of time doing my slides. The macro is fantastic!!