Home  第二章 VBAからみたセル操作


7. Offset(行番号,列番号)


自動登録では絶対に出てこないOffset

  1. ActiveCell.Offset(1, 0).Select
    このコードは、「アクティブセルからみて一行下を基準に選択する」という意味です。

  2. 基準セル.Offset(行番号,列番号) が基本的な形です。

  3. 例えば、下記のコードは分かりますか?
    Range("A1").Select
    ActiveCell.Offset(1, 0).Select

    結果は、A2を選択します。

    サンプルファイル 2_007.xls

    One Point アドバイス
    Offset(0,0)はOffset
    Offset(0,1)はOffset(,1)
    Offset(1,0)はOffset(1,) 等のようにゼロを省略できますが、
    記述としては0も表示しておいたほうがわかりやすいですね。

    記述例

    '----------------------------------------------------------------

    Sub A_01()
        Range("E5").Select
    End Sub

    '----------------------------------------------------------------

    Sub A_02()
        ActiveCell.Offset(1, 0).Select
    End Sub

    '----------------------------------------------------------------

    Sub A_03()
        ActiveCell.Offset(0, 0).Select
    End Sub

    '----------------------------------------------------------------

    Sub A_04()
        ActiveCell.Offset(0, 1).Select
    End Sub

    '----------------------------------------------------------------

    Sub A_05()
        ActiveCell.Offset(-1, 0).Select
    End Sub

    '----------------------------------------------------------------

    Sub A_06()
        ActiveCell.Offset(0, -1).Select
    End Sub

    '----------------------------------------------------------------

    Sub PlusA001()
        Range("E5").Offset(1, 1).Select
    End Sub

    '----------------------------------------------------------------

    Sub PlusA002()
        Range("E5").Offset(1, 1).Range("A1:C5").Select
    End Sub

    '----------------------------------------------------------------

    Sub PlusA003()
        Range("E5").Offset(1, 1).Range(Cells(1, 1), Cells(3, 3)).Select
    End Sub

    '----------------------------------------------------------------

    Top