Office関連

アクティブなページ上のシェイプを一括でグループ化するWordマクロ

Msdn フォーラムにあった質問「複数図形のグループ化」の回答用に書いたコードです。

Option Explicit

Public Sub Sample()
  ActiveDocument.Bookmarks("\Page").Range.ShapeRange.Group
End Sub

実行すると、下図のようにアクティブなページにあるシェイプを一括でグループ化します。
Wordマクロにおいて、ページ単位で何かを処理するときは、“定義済みのブックマーク”である「\Page」を使うのが便利です。

Word_Macro_ShapeRangeGroup_01

関連記事

  1. Excel

    Google スライドで新規プレゼンテーションを作成するVBAマクロ

    ここ数日PowerPointのマクロに加え、Google Apps S…

  2. Excel

    ドラッグ&ドロップでExcelファイルをアドイン形式(xlam)に一括変換するVBScript

    複数のExcelファイルをアドイン形式(xlam)に変換する必要があっ…

  3. Excel

    日経ソフトウエア 2014年 10月号 「VBAでExcelを業務アプリ化」

    購読している雑誌、日経ソフトウエア 2014年 10月号に「イベントプ…

  4. Office関連

    Office 2016関連資料のリンク

    Office 2016関連資料のリンクをメモしておきます。特に「O…

  5. Excel

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

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

  6. Office関連

    “元に戻す”履歴に文字列をセットするPowerPointマクロ

    PowerPointマクロでは、Presentationオブジェクトの…

コメント

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

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

Time limit is exhausted. Please reload CAPTCHA.

最近の記事

アーカイブ

RapidSSL_SEAL-90x50
PAGE TOP