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マクロ 参照)、といったときは役に立つかもしれません。

2つの文書を比較するWordマクロ前のページ

格子状にガイドを追加するPowerPointマクロ次のページ

関連記事

  1. Office関連

    「VBA質問箱」にアクセスできない。

    2013/03/19 追記:ドメインが更新されVBA質問箱が閲覧で…

  2. Office関連

    WordやExcelでミニ ツール バーを非表示(無効)にする。

    WordやExcel、PowerPointといったOffice製品で文…

  3. Office関連

    関数一覧(Excel 2010)

    関数の挿入ダイアログから抽出したExcel 2010の関数情報をリスト…

  4. Office関連

    組み込み定数を列挙するVBAマクロ

    定数の名前や値を調べたい、そんなときはTypeLib Informat…

  5. Office関連

    KB2553154の更新プログラムをアンインストールするVBScript

    2014/12/11 追記:当記事で紹介しているのは更新プログラム…

  6. Office関連

    CDOを使ってGmail送信を行うVBAマクロ(UTF-8対応版)

    2年ほど前にCDOを使ってGmail送信を行うVBAマクロについて記事…

コメント

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

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

Time limit is exhausted. Please reload CAPTCHA.

※本ページはプロモーションが含まれています。

Translate

最近の記事

アーカイブ

PAGE TOP