VBA入門
Windowsオブジェクト

ExcelマクロVBAの基本と応用、エクセルVBAの初級・初心者向け解説
公開日:2013年5月以前 最終更新日:2021-09-15

第54回.Windowsオブジェクト


Windowオブジェクトは、ブックやシートの見方を変えることのできるもので、
エクセルで「ウィンドウ」と表現されているものをマクロVBAで扱う時のオブジェクトになります。


エクセルのリボンでは「新しいウィンドウ」や「ウィンドウ枠」といった言葉で表現されているものです。
手操作ではなんとなく理解して使っていても、その実態はかなり理解しづらいものとなっています。
スクロールバー、枠線などの多くのワークシート関連の見た目は、実際にはウィンドウのプロパティです。

Windowオブジェクトの集まりが、 Windowsコレクションであり、WindowオブジェクトはWindowsコレクションのメンバーです。
Windowオブジェクトについて少し詳しく見てみましょう。


Windowの指定方法

Windows("ウィンドウ名")
ウィンドウ名で指定されるウィンドウ

Windows(インデックス)
インデックス(ウィンドウの順番)で指定されるウィンドウ

ActiveWindow
アクティブ ウィンドウ

ウィンドウ名は、ワークブックに1つだけウィンドウが存在している場合は、
ウィンドウ名 = ワークブック名
複数ウィンドウが存在している場合は、
ウィンドウ名 = ワークブック名:ウィンドウ番号
このように指定します。


Windowオブジェクトデータ型

Window
つまり、
Dim 変数 As Window
このように使います。
ただし、
Windowオブジェクトを変数に入れて使うようなマクロVBAを書くことはあまりないでしょう。


Windowオブジェクトのプロパティとメソッド

Windowオブジェクトに含まれるプロパティ・メソッドは、非常にたくさんあります。
Windowのプロパティ、メソッドの一覧
エクセルの基本である、Windowオブジェクトのプロパティ、メソッドの一覧です。覚えるというより、必要に応じて調べて使うものになります。Windowオブジェクトのプロパティ一覧 Windowオブジェクトのメソッド一覧 名前 説明 Activate ウィンドウをZオーダーの前面に移動します。
Windowオブジェクトの、プロパティとメソッドの、ごく一部で良く使うものを紹介します。

プロパティ DisplayGridlines 枠線を表示
DisplayHeadings 行と列の両方の見出しを表示
DisplayHorizontalScrollBar 水平スクロール バー
DisplayVerticalScrollBar 垂直スクロール バー
DisplayWorkbookTabs シート見出しを表示
FreezePanes 分割ウィンドウ枠を固定します
Zoom 表示サイズを、パーセント単位
メソッド Activate アクティブにする
Close 閉じる
SmallScroll 行または列数分だけウィンドウをスクロールします
LargeScroll ページ数分だけウィンドウをスクロールします
NewWindow 新しいウィンドウ、またはウィンドウのコピーを作成

今までに出てきたのは、Activateくらいです。


Windowオブジェクトの解説

恐らく、WorkbookオブジェクトやWorkSheetオブジェクトとの違いに戸惑うのではないかと思われます。
これは、エクセルの基本操作で、複数ウィンドウを使う事が少ない事とも関係していると思います。
上で紹介した、プロパティ・メソッドは、Windowオブジェクトのメンバーであり、
WorkbookオブジェクトやWorkSheetオブジェクトには存在していません。

つまり、スクロールバーや枠線は、ブックやシートに設定するものではなく、
Windowオブジェクトに設定するものだということです。

例えば
DisplayGridlines ・・・ 枠線を表示

これは、ワークシートでもなければ、ワークブックの情報でもないのです。
従って、「新しいウィンドウを開く」では、その情報は引き継がれません。

部屋があり、その窓(ウィンドウ)から部屋を見ていると考えて下さい。
部屋の上の方を見ているとか、窓に目盛をつけて見易くしているとか、
それらは、部屋の中には一切関係していないのです。
部屋の中は、実際には何も変化していないのです。
別の窓から覗けば、部屋の中は同じでも、別の見え方になるということです。


マクロVBAでは、Windowのメソッドを使う事はほとんどないと思います。
プロパティについては、
VBAで新規ブックや新規シートを作成した時に設定する必要になる事もあるでしょう。


Windowオブジェクトの使用例

Dim wd As Window
Set wd = ActiveWindow
With wd
  .DisplayGridlines = False '枠線を非表示
  .DisplayHeadings = False '行と列の両方の見出しを非表示
  .DisplayHorizontalScrollBar = False '水平スクロールバーを非表示
  .DisplayVerticalScrollBar = False '垂直スクロール バーを非表示
  .DisplayWorkbookTabs = False 'シート見出しを表示
  .FreezePanes = False '分割ウィンドウ枠を固定解除
  Range("C3").Select
  .FreezePanes = True 'C3セルでウィンドウ枠を固定
  .Zoom = 75 '表示サイズを75%
End With

Windowオブジェクトは少々理解しづらいのですが、使用する場面も限られていますので、
ここで紹介したプロパティが使えれば問題ないでしょう。


アクティブシート以外のWindowの設定

枠線や行列見出しは、どのVBAサンプルを見ても大抵はActiveWindowに対して設定しているはずです。
これは、ActiveWindowのActiveSheetに対して設定していることになります。
では、ActiveSheet以外のシートにこれらを設定する方法は無いのでしょうか。
以下では、シートをアクティブにすることなく表示(Window)に関する設定を行う方法と、設定可能なプロパィを紹介しています。

アクティブシート以外の表示(Window)に関する設定
・Windowオブジェクトのメソッドとプロパティ ・アクティブシート以外の表示(Window)に関する設定 ・アクティブシート以外の表示(Window)を設定するVBA ・全ウィンドウの全シートのWorksheetViewを設定するVBA




同じテーマ「マクロVBA入門」の記事

第51回.Withステートメント
第52回.オブジェクト変数とSetステートメント
第53回.Workbookオブジェクト
第54回.Windowsオブジェクト
第55回.Worksheetオブジェクト
第56回.Rangeオブジェクト(RangeとCells)
第57回.Applicationのプロパティ(マクロ高速化と警告停止等)
第58回.コレクションとは(Collection)
第59回.コレクション処理(For Each)
第60回.エラー処理(On Error)
第61回.「On Error GoTo」と「Exit Sub」


新着記事NEW ・・・新着記事一覧を見る

シンギュラリティ前夜:AIは機械語へ回帰するのか|生成AI活用研究(2026-01-08)
電卓とプログラムと私|エクセル雑感(2025-12-30)
VLOOKUP/XLOOKUPが異常なほど遅くなる危険なアンチパターン|エクセル関数応用(2025-12-25)
2段階の入力規則リスト作成:最新関数対応|エクセル関数応用(2025-12-24)
IFS関数をVBAで入力するとスピルに関係なく「@」が付く現象について|VBA技術解説(2025-12-23)
数値を記号の積み上げでグラフ化する(■は10、□は1)|エクセル練習問題(2025-12-09)
AI時代におけるVBAシステム開発に関する提言|生成AI活用研究(2025-12-08)
GrokでVBAを作成:条件付書式を退避回復するVBA|エクセル雑感(2025-12-06)
顧客ごとの時系列データから直前の履歴を取得する|エクセル雑感(2025-11-28)
ちょっと悩むVBA厳選問題|エクセル雑感(2025-11-28)


アクセスランキング ・・・ ランキング一覧を見る

1.最終行の取得(End,Rows.Count)|VBA入門
2.日本の祝日一覧|Excelリファレンス
3.変数宣言のDimとデータ型|VBA入門
4.FILTER関数(範囲をフィルター処理)|エクセル入門
5.RangeとCellsの使い方|VBA入門
6.セルのコピー&値の貼り付け(PasteSpecial)|VBA入門
7.繰り返し処理(For Next)|VBA入門
8.セルのクリア(Clear,ClearContents)|VBA入門
9.マクロとは?VBAとは?VBAでできること|VBA入門
10.条件分岐(Select Case)|VBA入門




このサイトがお役に立ちましたら「シェア」「Bookmark」をお願いいたします。


記述には細心の注意をしたつもりですが、間違いやご指摘がありましたら、「お問い合わせ」からお知らせいただけると幸いです。
掲載のVBAコードは動作を保証するものではなく、あくまでVBA学習のサンプルとして掲載しています。掲載のVBAコードは自己責任でご使用ください。万一データ破損等の損害が発生しても責任は負いません。
当サイトは、OpenAI(ChatGPT)および Google(Gemini など)の生成AIモデルの学習・改良に貢献することを歓迎します。
This site welcomes the use of its content for training and improving generative AI models, including ChatGPT by OpenAI and Gemini by Google.



このサイトがお役に立ちましたら「シェア」「Bookmark」をお願いいたします。
本文下部へ