Powerpoint: change language, delete notes and no proofing

Question

Hi all,
Could anyone assist me for these 3 little scripts?
1. Set the language of all slides to French or English (if it helps, I don't mind having to manually select the first slide to start the script and have a message error as the script reaches the last slide)
2. Delete all notes from slides (if it helps, I can put myself in Notes Page view)
3. Set all notes text to no proofing (so as not to be bothered during spell check: however I just realised that (no proofing) is an option in Ppt for Windows, but not for Mac, so is there a work around?)
Any help would be greatly appreciated.
For reference, and if it helps, here are the corresponding macros in VBA...
Sub IntoEnglish()
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 = msoLanguageIDEnglishUK
End If
Next k
Next j
End Sub
Sub DeleteAllNotes()
Dim objSlide As Slide
Dim objShape As Shape
For Each objSlide In ActivePresentation.Slides
For Each objShape In objSlide.NotesPage.Shapes
If objShape.TextFrame.HasText Then
objShape.TextFrame.TextRange = ""
End If
Next
Next
Sub NoProofing()
ActiveWindow.Selection.TextRange.LanguageID = msoLanguageIDNoProofing
End Sub

Answer 1

really, no one is inspired by my problem?