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!!
We need a macro just to change the spell checking language…! Are they crazy or just stupid, those microsofties?
great script !!
That worked perfectly for me.
Thank you so much, it’s been driving me mad! Shame it doesn’t work on the comments as well but I’m much happier than before thanks to you 🙂