この記事では、Powerpointで画像や図形を必要な時だけ拡大・縮小する「ポップアップ(もどき)」のテクニックを紹介します。
- 簡単に設定できるがスライドショーモードでしか使えないもの
- 設定は手間がかかるが通常モードで使えるもの
を紹介していきます。少し手間がかかるし、そんなに需要がないかも?ですが、よかったら参考にしてください!
目次~PowerPointで画像ズーム~
powerpointで画像をポップアップする(スライドショーモード)
手順
ポップアップ後のサイズの画像を貼り付けたスライドを作っておきます。
関係ないスライドになるので、非表示(スライドショーで表示されない)にしておきます。
ツールバーの 挿入 ⇒ ズーム ⇒ スライドズーム を選択
該当のスライドを選択します。
すると、下図のように挿入されます。
ズーム ツールバーで画像のサイズや枠線の色・有無は調整できます。
ズームの設定も変えれます↓
・再度クリックした時に元のサイズに戻す設定(Back spaceでも戻れますが)
・指定サイズに到達するまでの時間を設定
通常モードでは使えません!
どういう動きになるかは、下の動画をみてください。
完成動画
■メリット:画像をクリックする必要はありますが、ポップアップと呼ぶにふさわしい
■デメリットは{ファイルの中に余計なスライドができる}、{ポップアップ画像が多いほど余計なスライドが増える}、{スライドショーモードでしか使えない(説明する人専用の機能)}
powerpointで画像をポップアップする(通常モード)
スライドショーモードって、プレゼン以外ではそんなに使わないですよね?もちろんお客さんや会社のトップに説明する時にはつかいますが、そんなのはエンジニアにとっては全体の1割にもなりません。
よって、通常モードでポップアップする方法を検討しました。
方法概要
- 画像を○倍、1/○倍するマクロを作っておく
- クイックアクセスツールバーに登録しておく
- 必要な時には画像を選択し○倍マクロを使う
- 終わったらControl+Zで戻すか1/○倍マクロを使う
手順
① Powerpointで新規プレゼンテーションを起動
② Alt + F11 でVBAを呼び出します。
③ 標準モジュールを挿入します。
④ コードを貼り付ける ※これは画像を10倍/10分の1倍にするものです。
Sub Fig10倍() ActiveWindow.Selection.ShapeRange.ScaleWidth 3.1622, msoFalse, msoScaleFromTopLeft ActiveWindow.Selection.ShapeRange.ScaleHeight 3.1622, msoFalse, msoScaleFromTopLeft
End Sub
Sub Fig10分の1倍() ActiveWindow.Selection.ShapeRange.ScaleWidth 0.31622, msoFalse, msoScaleFromTopLeft ActiveWindow.Selection.ShapeRange.ScaleHeight 0.31622, msoFalse, msoScaleFromTopLeft
End Sub
⑤ 名前を付けて保存する。
※名前は例えば『画像拡大縮小』とし、ファイルの種類を.pptmにする。
⑥ VBAを閉じる
PowerpointはEXCELやOutlookよりマクロを使うまでの手順が多いです。
(Excel、Outlookの手法は過去に紹介しましたので比較してみてください)
EXCELはアドインの登録が簡単
Excel_VBAの知識がなくても大丈夫!マクロを簡単に作成し、すべてのファイルで使用する方法
Outlookは特に設定なしで使える
片手で食事をとりながらメールを見る:Outlook(365)で既読→次のメールへ移動するショートカット
Powerpointは下の①〜⑩の手順をこなす必要があります。
① 先ほどのpptmファイルが開いている状態で、ホーム – オプション – クイックアクセスツールバー を選択し、コマンドの選択を『マクロ』にします。
クイックアクセスツールバーのユーザー設定を『〇〇.pptmに適用』にします。
② マクロを追加する
クイックアクセスツールバーに登録されると下図の様になる。
※この段階では『画像拡大縮小.pptm』のファイル上であればマクロを使えますが、他のファイルには使えない状態です。
③ pptmファイルを上書き保存し、名前を付けて保存でppamファイルとして保存する。
※プルダウンで種類をppamにしたら保存場所は勝手に変わるので、作業フォルダ(例えばデスクトップ)に保存します。
※ppamのデフォルト保存場所は後で使うので、メモするかアドレスをコピーしておいてください。
ここからさらに難易度が上がります。
④ デスクトップに保存したppamファイルを『7-Zip』や『Lhaca』系の圧縮・解凍ファイルで開きます。
⑤ ppamの中身構成の中のuserCustomizationフォルダを開く
⑥ customUL.xmlを解凍する。7-Zipの場合は、この後ファイルの保存場所を聞いてくるので、デスクトップなどに保存する。
⑦ デスクトップに保存したcustomUL.xmlをメモ帳で開く
⑧ メモ帳を上書き保存し、デスクトップのcustomUI.xmlを元の場所(ppamの中身)に戻す。
この時、本当に追加しますか?と聞いてくるので、「はい」にする。
⑨ これでppamファイルが整ったので、アドインファイルのデフォルトフォルダに戻す
⑩ powerpointで新規プロジェクトを作成しておき、
ホーム – オプション – アドイン – 管理(A)をPowerpoint アドインにする – 設定を押す
新規追加
ppamファイルを選択
チェックが入っている事を確認し、閉じる
これですべてのファイルでマクロが使える様になりました。
画像をクリックして
マクロ発動
どどんっ
ポップアップもどきですが、完成です。
■メリットは通常モードで使える
■デメリットは、{マクロを入れている人しか使えない(スライドショーモードのテクはマクロは設定不要)}、{画像をクリック+マクロ発動の2 STEPが必要}
完成動画
オートシェイプの拡大・縮小は注意が必要
画像はこれでいいのですが、オートシェイプを拡大する時は倍率設定が変わります。
画像サイズが縦横比固定になっているかで、縮尺度が変わる
Sub Fig10分の1倍() ActiveWindow.Selection.ShapeRange.ScaleWidth 0.31622, msoFalse, msoScaleFromTopLeft ActiveWindow.Selection.ShapeRange.ScaleHeight 0.31622, msoFalse, msoScaleFromTopLeftEnd Sub
マクロは色付き字部の2行で構成されています。
1行目は横幅の倍率設定(ScaleWidth)で、2行目が縦幅の倍率設定(ScaleHeight)です。
下図はExcelで同じようなマクロを作った時の画像ですが、画像サイズの設定が縦横比を固定するを適用する場合(チェックがある場合)、ScaleWidthを変更すると自動でScaleHeightも変更され、ScaleHeightを変更すると自動でScaleWidthも変更されます。
【Excel】画像を瞬時に1/4倍(小さく)するマクロ!スクショを貼り付ける時に便利
【Excel】画像を瞬時に1/4倍(小さく)するマクロ!スクショを貼り付ける時に便利上のリンク記事の例では、マクロ1行目で縦横が0.5倍、マクロ2行目で縦横が0.5倍されるので、0.5倍×0.5倍(=0.25倍=1/4に縮小)されます。
よって、マクロ実行結果は、100mm角の画像が1/4のサイズの25mmに縮小(0.25倍)されています。
画像サイズの設定が縦横比を固定するを適用しない場合(チェックを外している場合)、マクロ1行目で横幅のみ0.5倍、マクロ2行目で縦幅のみ0.5倍され、実行結果は0.5倍になります。
オートシェイプは、デフォルトが図形の縦横比を固定するがオフになっているので、10倍 ⇔ 1/10倍する場合は、設定値を10 ⇔ 0.1 にする必要があります。
参考コード
Sub オートシェイプ10倍() ActiveWindow.Selection.ShapeRange.ScaleWidth 10, msoFalse, msoScaleFromTopLeft ActiveWindow.Selection.ShapeRange.ScaleHeight 10, msoFalse, msoScaleFromTopLeft
End Sub
Sub オートシェイプ10分の1倍() ActiveWindow.Selection.ShapeRange.ScaleWidth 0.1, msoFalse, msoScaleFromTopLeft ActiveWindow.Selection.ShapeRange.ScaleHeight 0.1, msoFalse, msoScaleFromTopLeft
End Sub
実務の会議でやってみたら、おおーっという声はあがること間違いなし!
ただやはり、EXCELのポップアップの様に万能感はありません。
使いどころを押さえて試してみてください。
パワーポイントのポップアップ関連ならこちらの記事も参考になります。
Powerpointちょいテク!アニメーションでポップアップするオブジェクトを隠しておく方法
記事内で紹介した関連リンク
見た目すっきり!Excelでセルを選択した時だけ画像を表示する(ポップアップする)方法
Excel_VBAの知識がなくても大丈夫!マクロを簡単に作成し、すべてのファイルで使用する方法
Powerpointちょいテク!アニメーションでポップアップするオブジェクトを隠しておく方法
片手で食事をとりながらメールを見る:Outlook(365)で既読→次のメールへ移動するショートカット
最後まで見ていただき、ありがとうございました。
広告
広告
広告