Microsoft Powerpoint for Mac 2011で全てのスライドのノートを抽出する

最初、Visual Basic for Applications を使用して、PowerPoint 2002 スライド ノートを抽出します。のコードをコピペしてみましたが、上手く行きませんでした。

そこで、もうひとひねりして、PowerPoint VBA - 全スライドのノートを削除する - | プレゼン　トラのアナを参考に以下のようなマクロを書いてみました。

Sub GetAllComments()
    For Each mySld In ActivePresentation.Slides
          Debug.Print mySld.NotesPage.Shapes.Placeholders(2).TextFrame.TextRange
          Debug.Print "--"
    Next
End Sub

このマクロを実行すると、イミディエイトウインドウというウインドウに全スライドのノートが'--'区切りで出力されます。
この出力はテキストエディタ等にコピペして利用する事ができます。

macでもいつの間にかVBが使える様になってたんですねぇ(マクロのみだと思いますけど)