엑셀 VBA 셀 선택하기

하나의 셀을 선택하는 방법

 

[ A1 ] 셀을 선택하는 방법

 

▶ Range("a1").select

 

▶ Cells(1, 1).select

 

▶ Cells(1, "a").select

 

▶ 변수 활용(1)

 

dim i as long

 

i = 7

 

range("a" & i).select

 

Cells(i, "a").select

 

▶ 변수 활용(2)

 

dim j as Range

 

set j = Cells(1, "a")

 

j.select

 

▶ 데이터가 있는 마지막 셀 선택하기

 

Range("a1").End(xlDown).Select

→ [ A1 ] 셀을 선택 후 [ Ctrl + ↓ ]를 누르는 것과 동일

 

이런 방식을 사용할 경우 중간에 빈 셀이 있을 경우 마지막 데이터 셀에 접근을 못할 수 있다.

 

Cells(Rows.count, "a").End(xlUp).Select

→ [ A ]행의 제일 마지막 열에 있는 셀을 선택하고 [ Ctrl + ↑ ]를 누르는 것과 동일

 

[ Cells(Rows.count, "a").Select ]를 실행하면 어디를 선택하는지 알 수 있음.

 

 

Range("a1").End(xlToRight).Select

→ [ A1 ]셀을 선택 후 [ Ctrl + → ]를 누르는 것과 동일

 

Cells(1, Columns.count).End(xlToLeft).Select

→ [ A ]행의 제일 마지막 열에 있는 셀을 선택하고 [ Ctrl + → ]를 누르는 것과 동일

 

728x90

반응형

SMALL

▶ 형 / 열 전체 선택하기

 

Columns(2).Select

Columns("b").Select

→ [ B ] 열 전체 선택

 

Rows(2).Select

→ [ 4 ]행 전체 선택

 

Range("a1").EntireColumn.Select

→ [ A1 ] 셀이 속해있는 전체 열을 선택

 

Range("a1").EntireRow.Select

→ [ A1 ] 셀이 속해있는 전체 행을 선택

 

 

▶ 범위의 행 / 열 선택하기

 

dim rng as Range

 

set rng = Range("A1:D10")

 

rng.EntireRow.Select

 

→ 해당 영역의 전체 행 선택

---

dim rng as Range

dim i as Long

 

set rng = Range("A1:D10")

 

i = rng.Rows.Count

MsgBox rn

 

→ 해당 범위의 행의 개수를 셀 수 있음

 

 

▶ 참고하기

 

cells 함수로 [ cp1 ] 셀을 선택한다면?

 

cells(1, 숫자)인데 cp 가 몇 번째 열인지 찾기가 쉽지 않다

 

그럴 경우 [ Ctrl + G ]를 눌러 직접 실행창 실행

 

[ ? range("cp1").column ] 작성 후 엔터