PowerPointプレゼンテーションでスライドを効果的にシャッフルする方法
PowerPointにちょっとした工夫が必要になったことはありませんか？ いつも同じスライドの順番に飽き飽きして、スライドをランダムにシャッフルするなど、視聴者にサプライズ要素を加えたいと思ったことはありませんか？ PowerPointでは、スライドをランダムにシャッフルするなど、すぐには分かりにくいですが、少し手を加えるだけで（手動またはVBAマクロを使って）、プレゼンテーションをよりダイナミックにすることができます。少し奇妙に思えるかもしれませんが、これらのちょっとした工夫は、特にクイズやフラッシュカードなど、順番が重要になるインタラクティブなコンテンツを作成する際に、視聴者の興味を引き続けるのに非常に役立ちます。
とはいえ、完璧ではありません。小さなデッキなら手動でシャッフルしても問題ありませんが、真のランダム性を求めるならVBAを使う方が良いでしょう。ただし、マクロを有効にするのは初心者にとっては面倒で、設定によってはマクロが全くブロックされてしまうこともあります。とはいえ、一度設定してしまえば、必要に応じてスライドをランダム化するマクロを実行できます。これは実験やクリエイティブなプレゼンテーションに最適です。ただし、一部のマシンでは最初は失敗しても、再起動後に魔法のように動作する場合があるので、最初は不安定でも落胆しないでください。
PowerPointでスライドを手動でシャッフルする方法
スライドソータービューから始めましょう
これはとても簡単です。上部のリボンメニューの「表示」タブに移動し、 「スライド一覧」をクリックします。すべてのスライドの小さなサムネイルが並べて表示されます。すばやく並べ替えるには便利ですが、特に手動で行う場合は、完全にランダムになる保証はありません。並べ替えるにはスライドをクリックしてドラッグする必要があります。大きなスライドデッキがある場合は少し面倒です。ズームアウトボタン（–右下のアイコン）を使用してズームアウトすると、すべてのスライドを一度に見ることができます。設定によっては、全体像を把握するのに数回試行する必要がありますが、まあ、単純なシャッフルには十分な速さです。
スライドを手動で並べ替える
- スライドのサムネイルをクリックし、シーケンス内の別の場所にドラッグします。他のスライドでも、ランダム性が気に入るまで繰り返します。正直なところ、これは真のランダム性というよりも、スライドをチェスのように巧みに操るテクニックに近いですが、急いで準備するだけなら十分に速いです。
ただし、これは完璧なシャッフルを保証するものではないことを覚えておいてください。より信頼性が高く自動化された方法をお探しの場合は、VBAを使用することをお勧めします。
VBAコードを使ってPowerPointのスライドをランダム化する方法
マクロを準備する
この部分は少しマニアックですが、全然大丈夫です。まず、「開発」タブを有効にする必要があります。PowerPointで、「ファイル」>「オプション」に移動し、左側の「リボンのユーザー設定」を見つけます。右側のパネルで、「開発」の横にあるチェックボックスをオンにして「OK」をクリックします。すると、リボンに「開発」という新しいタブが表示されます。
マクロを挿入して実行する
- 開発>マクロをクリックします。
- ShuffleSlidesのような名前を付けて、「作成」をクリックします。すると、VBAの魔法がすべて詰まったVisual Basic Editorが開きます。
VBAコードを貼り付けます
次のコードをコピーしてエディターに挿入します。
Sub Shuffleslides() Dim FirstSlide As Integer Dim LastSlide As Integer Dim RSN As Integer Randomize FirstSlide = 2 ' change if your starting slide isn't 2 LastSlide = ActivePresentation. Slides. Count ' automatically detect total slides Do While True ' Keep shuffling forever or until you stop it RSN = Int((LastSlide - FirstSlide + 1) * Rnd + FirstSlide) ActivePresentation. Slides(FirstSlide).MoveTo RSN ' Wait a bit before each shuffle, so it doesn't happen instantly Application. Wait (Now + TimeValue("0:00:01")) ' waits 1 sec Loop End Sub このバージョンでは、手動でスライドの範囲を設定する代わりに、プレゼンテーション内のすべてのスライドを自動検出します（ を使用ActivePresentation. Slides. Count）。これは、スライド全体をシャッフルしたい場合に便利です。一時停止付きの無限ループ機能により、実行を開始するだけでスライドを一定のリズムでシャッフルできますが、手動で停止しない限り、永遠にシャッフルが続くので注意してください。
ショー中にシャッフルするようにボタンを設定します
- PowerPoint に戻り、スライドに図形を挿入して右クリックし、[マクロの割り当て] を選択します。
- Shuffleslides (またはマクロに付けた名前)を選択します。
- これで、スライドショーを実行すると、そのボタンをクリックするとシャッフルが開始されます。また、マクロをタイマーで実行するように設定したり、自動で実行するように設定したりと、お好みに合わせてカスタマイズできます。
正しく保存する
ファイルは必ずPPTM（マクロ有効）として保存してください。「ファイル」>「名前を付けて保存」 >ドロップダウンから「PPTM」を選択してください。そうしないと、PowerPointによってマクロが削除され、次回から動作しなくなります。
追加のトリック: 偶数または奇数のスライドのみをシャッフルする
スライドの半分だけ（例えば偶数番号のスライドだけ）をシャッフルしたい場合は、マクロを調整してRSN Mod 2偶数番号のスライドだけをシャッフルするように設定できます。VBAコードに、偶数番号または奇数番号のスライドのみをシャッフルするチェックを組み込むこともできます。これは、タイトルスライドや重要な情報スライドなど、特定のスライドを固定しておきたい場合に便利です。
スライドシャッフルを無限にループさせる方法
スライドの順序を数秒ごとに更新し続ける、終わりのないシャッフル処理がしたいですか？while trueループとApplication. Waitを使った上記のコードがその方法です。ただし、このコードは操作するまで実行され続けることに注意してください。これは、インフォメーションキオスクやデジタルビルボードのようなディスプレイに便利です。ただし、デスクトップで長時間放置しないでください。PowerPoint がクラッシュしたり、飽きてしまったりする可能性があります。
まとめ
正直に言うと、これらの方法は完璧ではありませんが、十分に役立ちます。手動でシャッフルするのは手っ取り早いですが、マクロを使えば、より高度な制御によって真のランダム性を実現できます。ただし、PPTM形式で保存し、マクロを有効にし、セキュリティプロンプトに注意することを忘れないでください。これらのトリックは、マクロのセキュリティ設定に慣れている場合に最適です。Officeはマクロに関して面倒なことが時々あるためです。
まとめ
- スライドソーターによる手動シャッフル – 速いが、あまりランダムではない
- 真のランダム性と自動化を実現するにはVBAマクロを使用する
- VBA コードを調整して、どのスライドをシャッフルするか、または無限にループするかを選択します。
- マクロが失われないようにPPTMとして保存することを忘れないでください
- 特にマクロのセキュリティ設定に関しては、多少の試行錯誤が必要になることを覚悟してください。
結論
これが、プレゼンテーションを少しでも活気づけるための確かな出発点になれば幸いです。ただ遊んでいるだけの場合でも、凝ったインタラクティブなクイズを作ろうとしている場合でも、スライドをランダムにシャッフルする機能があれば、ちょっとした予測不能性が生まれ、聴衆の興味を引きつけることができます。これはなかなか面白い機能で、マクロを設定してしまえば、今後のプレゼンテーションでも簡単に実行できます。この機能が、時間を節約したり、よりプロフェッショナルな印象を与えたりするのに役立つことを願っています。
この記事は役に立ちましたか？