OfficeType

VBA~列を固定しよう~Excel

VBAで列を固定したい場合はWindow.FreezePanesプロパティをTrueに設定します。固定したい列の1つ右の列のアルファベットまたは列番号を指定します。

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

Sub test1()

Columns(2).Select
ActiveWindow.FreezePanes = True

End Sub

image-01

行と列の固定

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

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

Sub test2()

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

End Sub

image-02

固定の解除

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

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

Sub test3()

ActiveWindow.FreezePanes = False

End Sub