それはグローバル化社会の中で思えるように奇妙なように、MS PowerPointの開発者は、ユーザーがプレゼンテーション全体の言語を変更できるようにするために必要と考えていない。 あなたはスライドを変換するときに、これは特に迷惑になります。 多言語テキストである場合、言語ボタン（下のバー）は、単にクリックできません：それは主なものを選択することは不可能であること、その後、簡単にスライド上の言語が混在で終わる、あなたは気づくでしょう（MSワード、この作品ではなく、MS PowerPointの）が選択されます。 英語/米語と英語/英国の間でさえミックスは、ボタンを無効にします。
"デフォルト"言語を決定する上で基本的なロータリーで構成されています。 単にこれは実際に動作するいくつかのいずれかの言語のスライド上で言語バーの言語をクリックし、言語を選択し、 "デフォルトで"キーを押します。
すべての新しいスライドには、体系的に任意の新しいボックスに既定の言語が適用されます。
しかし、これは翻訳したい既存のプレゼンテーションの問題を解決していません。 フランスのスライドに英語で書き始め、自動補正では、アクティブ 'をタイプとして正しい "がある場合はおそらく完全にそれを噛んで、あなたのスペルを下線になります。 運がよければ、言語の選択]ボタンは動作します。 しかし、フランス語frとの単純な混合物は不可能それを使用するフランス語はchmakes。
その後、どのようにスライド全体の言語を決定するのですか？ あるいは（woaw）全体のプレゼンテーションの言語？
（！）さて、この問題を回避行くための唯一の方法は私が持っているマクロですChocotoothのブログ ：
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 サブ SetLangUS（） ほのか scount、J、K、K の scount fcount = ActivePresentation.Slides（J）。Shapes.Count に J = 1 の場合 fcount scount = ActivePresentation.Slides.Count fcount "変化 = 1〜 すべての k = 1 To fcount 'change all k = 1のために _。 次のk fcount 場合 TextRange.LanguageID = msoLanguageIDEnglishUS 終了 = ActivePresentation.Slides（J）。NotesPage.Shapes.Count fcount "変更する には、 すべて の j End Sub _。TextRange.LanguageID = msoLanguageIDEnglishUS エンド場合次のk次のj End Sub の
あなたはこれで何をすべきでしょうか？ "開発"タブでVisual Basic]ボタンをクリックします。
左側のナビゲーションペインで、 "VBAProjectの"を右クリックして新しいモジュールを挿入します。
これは、新しいウィンドウが開きます。 それにコードを貼り付けます。 と "プレイ"ボタンでそれを実行します。
参照してください？ すべてのテキストボックスは、英語/米国に設定されています。 あなたは。BAS拡張子を持つファイル内で後で使用するためにこのコードを保存することができます。
PS：親愛なるマイクロソフトは、単にPowerPointで言語切り替え機能は、事前に多くの感謝を統合することにより、これより少ない退屈なソリューションを提供することができます。
