VBA入門
ウィンド枠の固定(FreezePanes)

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

第70回.ウィンド枠の固定(FreezePanes)


ウィンドウ枠を固定し、行の上部や列の左側がスクロールされないようにする場合のマクロVBA解説になります。


ワークシートの行の上部や列の左側は、通常は見出しとして使う事が多くなります。
ウィンドウ枠を固定することで見出しの行や列を固定し、スクロールしても見出しが表示されたままにする場合が多くなります。

通常は事前にウィンドウ枠を固定しておけば済みますが、
マクロVBAで作成したシートでは、必要に応じてVBAでウィンドウ枠を固定する必要が出てきます。

VBAでウィンドウ枠の固定状態を変更する場合は、
WindowオブジェクトのFreezePanesプロパティの値を変更することで行います。


Window.FreezePanesプロパティ

Windowオブジェクト.FreezePanes = 設定値

設定値
True の場合
ウィンドウ枠を固定します。
アクティブセルの上・左が固定されます。

False の場合
固定を解除します。

これは、Windowオブジェクトのプロパティです。
Windowオブジェクトの指定には、

ActiveWindow
Windows("ウインドウ名")

これらになりますが、
ウインドウ枠固定では、実質ActiveWindow一択と言ってよいでしょう。

理由としては、固定位置のセルをアクティブにしなければならず、
セルをアクティブにするためには、そのシートをアクティブにする必要があり、
結果として、アクティブウインドウに対して操作することになるからです。

Windowオブジェクトのプロパティが変更できるのは、
アクティブシートに対してのみ設定可能であるということです。
アクティブシート以外のWindowを設定できるWorksheetView
・Windowオブジェクトのメソッドとプロパティ ・アクティブシート以外の表示(Window)に関する設定 ・アクティブシート以外の表示(Window)を設定するVBA ・全ウィンドウの全シートのWorksheetViewを設定するVBA

つまり、

ActiveWindow.FreezePanes = True
Windows("Book1").FreezePanes = True

このような指定が可能ですが、後者はほぼ意味を持たない指定という事です。
少なくとも、
Windows("Book1.xls").Sheets("Sheet2").FreezePanes = True
このような指定はできません。

ウインドウ枠の固定は、アクティブセルの位置で固定されますので、
事前に、固定位置のセルをアクティブにしておく必要があります。

ウインドウ枠固定時の注意
既にウィンドウ枠が固定されている場合に、
新たに、別の位置でウィンドウ枠を固定しようとしても変更されません。

ウィンドウ枠の固定位置を変更する場合は、
固定を解除してから、再度固定しなければなりません。


ウインドウ枠固定の使用例

Workbooks("Book1.xls").Worksheets("Sheet2").Activate
Range("B2").Select
ActiveWindow.FreezePanes = False
ActiveWindow.FreezePanes = True

対象のシートをアクティブにしてから、
固定するセルを選択し、
念の為、ウィンドウ枠の固定を解除してから、
ウィンドウ枠を固定しています。

VBA マクロ 画像

実行後は、SheetのB2セルが選択状態となり、この位置でウィンドウ枠が固定されます。


データの行数・列数が多い時に、ウィンドウ枠が固定されていないと非常に使いづらいシートとなります。
マクロVBAで作成したシートを使う時に、毎回手作業でウィンドウ枠を固定したのでは効率が悪くなります。
マクロVBAで作成するシートは、使用者の利便性を考慮して作成するようにしてください。





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

第67回.総合練習問題7
第68回.シートの保護、ブックの保護(Protect)
第69回.シートの非表示(Visible,Hidden)
第70回.ウィンド枠の固定(FreezePanes)
第71回.印刷(PrintOut)
第72回.印刷プレビュー(PrintPreview)
第139回.エクスポート(PDF/XPS)
第73回.ページ設定(PageSetup,PageBreak)
第74回.ファイルを開くダイアログ(GetOpenFilename)
第75回.名前を付けて保存ダイアログ(GetSaveAsFilename)
第76回.ファイルダイアログ(FileDialog)


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

「Python in Excel」数独(ナンプレ)解法プログラムの移植と最適化|エクセル関数応用(2026-08-14)
「Python in Excel」で自作関数を登録|アンピボット関数と計算順序|エクセル関数応用(2026-08-12)
ListBox・ComboBoxをマウスホイール対応させる|ユーザーフォーム入門(2026-08-09)
VBA モジュールエクスポートツール|モジュールを選別して一括出力|VBAサンプル集(2026-08-06)
「SUMIFSで動くのにXLOOKUPでエラー?」型不一致の関数別挙動|エクセル関数応用(2026-08-03)
生成AIが暴いた「VBAオワコン説」の盲点|問われるのは言語ではなく評価軸|エクセル雑感(2026-07-04)
【ITとは何か】Excel・VBAを学ぶ前に知っておきたい「4つの本質」|エクセル雑感(2026-06-24)
2つのシート名を交換するVBAをGeminiに作らせてみた。|VBA技術解説(2026-05-22)
ヘッダーに合わせて列をソートして値貼り付けするスマートな方法|VBAサンプル集(2026-05-20)
4大分岐関数の使い分け(IF/IFS/SWITCH/CHOOSE)|エクセル入門(2026-05-19)


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

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




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


記述には細心の注意をしたつもりですが、間違いやご指摘がありましたら、「お問い合わせ」からお知らせいただけると幸いです。
掲載のVBAコードは動作を保証するものではなく、あくまでVBA学習のサンプルとして掲載しています。掲載のVBAコードは自己責任でご使用ください。万一データ破損等の損害が発生しても責任は負いません。
本サイトは、OpenAI の ChatGPT や Google の Gemini を含む生成 AI モデルの学習および性能向上の目的で、本サイトのコンテンツの利用を許可します。
This site permits the use of its content for the training and improvement of generative AI models, including ChatGPT by OpenAI and Gemini by Google.



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