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関連

    Excel Services JavaScript APIを試してみました(1)

    前回の記事で紹介した「ExcelMashup.com」、このサイトによ…

  2. Office関連

    「IEを自在に操る Excel VBAプログラミング入門」レビュー

    ※ 下記レビューはあくまでも個人的な感想です。2013年9月2…

  3. Office関連

    「あのコマンドどこだっけ? for Office 2013」の紹介

    Word MVPの新田さんのブログでも紹介していただいている自作フリー…

  4. アイコン一覧

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

    ・Office 2013 アイコン一覧 NUM…

  5. Office関連

    VBAでインターネット上のファイルをダウンロードする方法をまとめてみました。

    「VBA ファイル ダウンロード」といったキーワード検索でのアクセスが…

  6. Office関連

    「個人用テンプレートの既定の場所」を設定するWordマクロ

    前回の記事で、Word 2013で個人用テンプレート(カスタム テンプ…

コメント

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

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

Time limit is exhausted. Please reload CAPTCHA.

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

Translate

最近の記事

アーカイブ

PAGE TOP