셀 및 범위 선택하기

1. 셀 선택

Range("A1").Select

 

Range("D2").Select

 

2.특정 범위의 영역을 선택

Range("A1:B3").Select

 

Range("B2:D3").Select

 

 

3.여러 영역 선택

Range("A1:B2, D3:E5").Select

 

Range("A1:A2, B4:B6,D2:E3").Select

 

4.열 선택

Range("A:A").Select

 

Columns("B").Select

 

 

Columns(3).Select

 

5. 연속된 열 선택

Range("A:C").Select

 

Columns("A:B").Select

6.비연속적인 열 선택

Range("A:A,C:C,E:E").Select

Range("B:B,D:F,H:H").Select

7. 인접한 범위 선택

Range("A1").CurrentRegion.Select

Range("B4").CurrentRegion.Select

Range("A8").CurrentRegion.Select

Range("D2").CurrentRegion.Select

Range("G8").CurrentRegion.Select

8 사용된 범위 선택

ActiveSheet.UsedRange.Select

9 여러 셀 영역을 한번에 선택

Sub UnionExample()
    Dim rng1 As Range, rng2 As Range, rng3 As Range, unionRange As Range
    
    ' 첫 번째 범위 선택
    Set rng1 = Range("A1:B5")
    
    ' 두 번째 범위 선택
    Set rng2 = Range("D1:E5")
    
    ' 세 번째 범위 선택
    Set rng3 = Range("G1:H5")
    
    ' Union 메서드를 사용하여 범위 결합
    Set unionRange = Union(rng1, rng2, rng3)
    
    ' 결합된 범위 선택
    unionRange.Select
End Sub

10 교차 범위 선택

Sub IntersectExample()
    Dim rng1 As Range, rng2 As Range, intersectRange As Range
    Dim cell As Range

    ' 첫 번째 범위 선택
    Set rng1 = Range("A1:C5")

    ' 두 번째 범위 선택
    Set rng2 = Range("B3:D7")

    ' Intersect 메서드를 사용하여 교차하는 범위 설정
    Set intersectRange = Application.Intersect(rng1, rng2)
    
    '교차 범위 선택
    intersectRange.Select
End Sub