Microsoft Excel VBA - 指定した特定のセルを画面の左上隅に配置する方法

◆概要

このページは、Excel VBAで指定した特定のセルを画面の左上隅に配置する方法について記載しています。

◆Sample

指定した特定のセルを画面の左上隅に配置するには、次のようにします。この例では、「元帳」というシートのセルK60を左端隅にしています。

Sub cmdSelect元帳()

       Sheets("元帳").Activate

       Application.Goto reference:=Range("K60"), Scroll:=True

End Sub

次の例は、Ｒ１Ｃ１形式でセルを指定し、画面左上をA1にしています。

Sub cmdSelectA1()
    '画面左上をA1に移動させる
    Application.Goto reference:="R1C1", Scroll:=True
End Sub

Scroll引数は省略できます。

Application.Goto Reference:="R1C1"

R1C1形式にかえてRange形式で次のように指定することもできます。

Application.Goto Reference:=Range("A1")

White Tiger