Word VBAで図形の塗りつぶしをなしに

動作検証バージョン：64bit Windows 10 Pro + 32bit Word（バージョン2202 ビルド14931.20132 Microsoft Store）

「Word VBA 図形塗りつぶしなし」
といった検索キーワードでアクセスがありました。

［スポンサードリンク］

図形の塗りつぶしをなしにするサンプルマクロ

アクティブな文書内の1つ目の図形が、四角形や楕円などのときに以下のWordマクロを実行すると、塗りつぶしがなしの状態になります。

Sub 図形の塗りつぶしをなしにする()
　ActiveDocument.Shapes(1).Fill.Visible = msoFalse
End Sub

上記のサンプルマクロでは、以下のようなオブジェクトモデルを使用しています。

Documentオブジェクト ［ActiveDocumentで取得］
　└ Shapeオブジェクト ［.Shape(1)で取得］
　　　└ FillFormatオブジェクト ［.Fillで取得］
　　　　　└ Visibleプロパティ

Shapeオブジェクトに用意されているFillプロパティで、塗りつぶし書式を表すFillFormatオブジェクトを取得し、

FillFormatオブジェクトのVisbleプロパティにmsoFalseを設定しています。

VBAを使ったMicrosoft Officeの図形関連操作に慣れていない方の場合、ShapeオブジェクトのFillプロパティで取得できるのが、FillFormatオブジェクトである点に注意が必要です。

拙著『理解するExcel VBA／図形操作の基本』の、「3-2. FillFormatは塗りつぶし書式を表す」では、以下のようなオブジェクトモデルを使ったコードを解説しています。

Worksheetオブジェクト
　└ Shapeオブジェクト
　　　└ FillFormatオブジェクト
　　　　　└ Visibleプロパティ

最初に取得するオブジェクトが、Word.DocumentとExcel.Worksheetの違いはありますが、Shapeオブジェクト以下は同じです。

最終更新日時：2022-03-18 12:55

［スポンサードリンク］

『インストラクターのネタ帳』では、2003年10月から平日のほぼ毎日、Microsoft Officeの使い方などを紹介し続けています。
図形を操作するExcel VBAの基本を解説したキンドル本を出しました↓↓

Excel VBAユーザーを対象とした、Word VBAの入門書をキンドル本として出しました↓↓

グラフを操作するExcel VBAの基本を解説したキンドル本です↓↓

数式を使った条件付き書式設定が苦手な方に向けたKindle本を書きました↓↓

『インストラクターのネタ帳』を運営する伊藤潔人が、初めて書かせていただいた書籍です↓↓

PowerPoint VBA本は、実はオブジェクトブラウザーの使い方を徹底的に解説した本です↓↓

Pythonの外部ライブラリOpenPyXL（オープンパイエクセル）の入門書を、Excel VBAユーザーに向けに書きました↓↓

Pythonの文字列フォーマットの基本をキンドル本としてまとめました↓↓

小数とPythonのdecimalモジュールの基本をキンドル本としてまとめました↓↓

日経BP社から出版された、Excel VBAユーザー向けのPython超入門書です↓↓

上記の『Excel VBAユーザーのためのPythonプログラミング』の元になったキンドル本です↓↓

3年前(2021年4月)の
人気記事

「Shape・図形」の記事一覧