VB リハビリ(Excel VBA)

Union Application オブジェクトのメソッドだというのに眩暈を覚えたのでメモ。

Private Sub CommandButton1_Click()

    Dim c1 As Range

    Dim c2 As Range

    Dim a As Range
    Set c1 = Worksheets(”Sheet1”).Cells(24, 1)

    Set c2 = Worksheets(”Sheet1”).Cells(26, 9).Resize(1, 8)
    Set a = Union(c1, c2)

    a.Select

End Sub

# で、Application オブジェクトのメソッド見てみたら…