VBA～行を固定しよう～Excel

VBAで行を固定したい場合はWindow.FreezePanesプロパティをTrueに設定します。固定したい行の1つ下の行の行番号を指定します。

下のコードを実行すると行1が固定されます。スクロールしても行1は常に表示されます。

Sub test1()

Rows(2).Select
ActiveWindow.FreezePanes = True

End Sub

行と列の固定

固定したい行の1つ下の行で、固定したい列の1つ右の列に対応したセルを指定します。

下のコードを実行すると行1と列Aが固定されます。

Sub test2()

Range("B2").Select
ActiveWindow.FreezePanes = True

End Sub

固定の解除

固定を解除したい場合はWindow.FreezePanesプロパティをFalseに設定します。

下のコードを実行すると固定が解除されます。

Sub test3()

ActiveWindow.FreezePanes = False

End Sub