Office関連

ガイドを追加するPowerPointマクロ

PowerPointで図形の位置を調整するときに役立つガイド機能(ガイドを表示しよう 参考)ですが、PowerPoint 2013でGuide、Guidesオブジェクトが追加されたことによって、マクロからガイドを追加したり、色を変更したりすることができるようになりました。

Option Explicit

Public Sub Sample()
  With Application
    .DisplayGuides = True
    '水平方向のガイド追加
    .ActivePresentation.Guides.Add ppHorizontalGuide, 100
    '垂直方向のガイドを追加して色設定
    .ActivePresentation.Guides.Add(ppVerticalGuide, 100).Color = VBA.RGB(255, 100, 255)
  End With
End Sub

PowerPointGuides_01

もちろん、下記のようにガイドを削除することもできます。

Public Sub Sample2()
  Application.ActivePresentation.Guides(3).Delete
End Sub

マクロでガイドを追加する機会もなかなか無いかもしれませんが、“一定間隔で格子状にガイドを追加したい”(格子状にガイドを追加するPowerPointマクロ 参照)、といったときは役に立つかもしれません。

関連記事

  1. Office関連

    マクロでリボンを最小化する。

    mougの回答用に書いたコードです。忘れないうちにメモ。・…

  2. Office アドイン

    [Office用アプリ]Bing Maps for Accessの紹介

    Microsoft Download CenterでAccess向けO…

  3. Office関連

    サジェスト機能を利用したWord用ツール

    「Webサービスのサジェスト機能についてまとめてみました。」でWebサ…

  4. アイコン一覧

    Office 365アイコン(imageMso)一覧(K,L)

    Office 365のデスクトップ版Officeアプリケーション(Wo…

  5. Office関連

    「文書のスタイル」を設定するWordマクロ

    Wordのオプション画面 → 文章校正 → Word のスペル チェッ…

  6. Office アドイン

    [Office用アプリ]Random Data Generator

    Random Data Generatorはテスト用の個人情報データを…

コメント

  1. この記事へのコメントはありません。

  1. この記事へのトラックバックはありません。

Time limit is exhausted. Please reload CAPTCHA.

最近の記事

アーカイブ

RapidSSL_SEAL-90x50
PAGE TOP