농부지기

[ VBA. Cell 선택 - Addrress ]

1. 정의

    - 현재 선택되어 있는 Cell의 절대주소를 얻어온다.

2. 범례

    - strAddress = Selection.Address(rowabsolute:=False, columnabsolute:=False)

[ VBA. Cell 선택 - End ]

1. 정의

2. 범례

    - Range("D8").End(xlUp).Select
    - Range("D8").End(xlDown).Select
    - Range("D8").End(xlToLeft).Select
    - Range("D8").End(xlToRight).Select

3. 속성

    - xlLeft : 1,  xlToRight : 2,   xlUp : 3,   xlDown : 4

    - xlUp        : 위쪽    끝 (단축키 : <ctrl> +  ↑ )

                     : 선택된 위치(Cell)를 기준으로  위로 올라가면서 값이 존재 하는 Cell을 찾는 방식

    - xlDown   : 아래쪽 끝 (단축키 : <ctrl> +  ↓ )

                     : 선택된 위치(Cell)를 기준으로  아래로 내려가면서 값이 존재 하는 Cell을 찾는 방식

   - xlToLeft    : 왼쪽    끝 (단축키 : <ctrl> +  ← )

                     : 선택된 위치(Cell)를 기준으로   왼쪽으로 가면서 값이 존재 하는 Cell을 찾는 방식

   - xlToRight : 오른쪽 끝 (단축키 : <ctrl> +  → )

                     : 선택된 위치(Cell)를 기준으로  오른쪽으로 오면서 값이 존재 하는 Cell을 찾는 방식

4. 예문

    - Range(Range("E2"), Range("E2").End(xlDown)).Select

    - Range("A65536").End(xlUp).Offset(1, 0).Select

       : A열 맨 마지막에서 위로 올라가면서 값이 존재 하는 Cell을 찾고, Offset(1,0)으로 바로 아래 Cell을 선택

    - 아래 4개 문장은 동일하게 동작

       Cells(Rows.Count, "A").End(3)(2).Select

       Cells(Rows.Count,   1).End(3).Cells(2,1).Select
       Cells(Rows.Count,   1).End(3)(2,1).Select
       Cells(Rows.Count,   1).End(3)(2).Select

      : Y축 모든 Row에서, A열을 기준으로   값이 존재 하는 맨 마지막 Cell을 찾고, 그 바로 아래 Cell을 선택

[ VBA. Cell 선택 - SpecialCells ]

1. 정의 

    - cell을 선택 시 특정조건에 맞는 Cell값을 기준으로 선택 한다.

2. 범례

    - expression.SpecialCells(Type, Value)

    - Columns("A").SpecialCells(XlSpecialCellsValue).Select

3. XlCellType 상수값

     xlCellTypeAllFormatConditions.         -4172       모든 서식의 셀
     xlCellTypeAllValidation.                     -4174       유효성 조건이 있는 셀
     xlCellTypeBlanks.                             4              빈 셀
     xlCellTypeComments.                       -4144       메모가 들어 있는 셀
     xlCellTypeConstants.                       2               상수가 들어 있는 셀
     xlCellTypeFormulas.                        -4123        수식이 들어 있는 셀
     xlCellTypeLastCell.                          11             사용된 범위의 마지막 셀
    xlCellTypeSameFormatConditions.   -4173        같은 서식이 있는 셀
    xlCellTypeSameValidation.               -4175        같은 유효성 조건이 있는 셀
    xlCellTypeVisible.                             12             보이는 모든 셀

4. XlSpecialCellsValue

    - Value : Constants 

       16        xlErrors           :

       4          xlLogical         : 빈셀만 선택

       2          xlTextValues   : 공백을 제외한 숫자,문자 선택

       1          xlNumbers      : 숫자 선택

5. 예문

    Columns("A").SpecialCells(2).Select

    Range("A1:G10").SpecialCells(2).Select

    Set rngMyRange = Worksheets("Sheet7").Cells.SpecialCells(xlCellTypeFormulas)

6. 설명

     - SpecialCells(Type, Value) : arg가 2개 일 때는 Type, Value이고

     - SpecialCells(Value)           : arg가 1개 일 때는 Value만 이다.

[ VBA. Cell 선택 ]

1. 정의

    - 특정위치의 Cell을 일정범위만큼 선택 한다.

2. 절대위치 선택 - 예문

    1. 정의

        - Cell의 좌표를 Sheet의 맨 왼쪽 상단꼭지점을 기준으로 위치를 기준으로 시작 좌표가 설정된다.

    2. Range("A3:A5").Select

    3. 아래 4개의 문장은 모두 동일하게 수행 됨

       Range("A1:B2").Select

       Range("A1", "B2").Select

       Range("A1:A2", "B1:B2").Select

       Range("B2", "A1").Select

   4. Range("A:C").Select : A~C열  Select

       Range("1:10").Select : 1행~10행 Select

   4. Cells(5).Select

       Cells(5,1).Select

3. 상대위치 선택 - 예문

    1. 정의

        - Cell의 기본좌표(절대위치)는 Sheet의 맨 왼족 상단 꼭지점이며 (0,0)이 된다.

        - 개발을 하다 보면  특정위치(상대위치), 선택되어 있는 위치를 기준(0,0)으로 위치를 이동해야 되는 경우가 있다.

        - 이때 '특정위치(상대위치), 선택되어 있는 위치'를 기준(0, 0)으로 다시 X,Y index가 설정 되도록 할 수 있다. 

          이를 상대위치라 한다.