03 엄마도 따라 할 수 있는 Excel VBA - 셀 선택하기, 값 가져오기, 바꾸기

03 Excel VBA - 셀 선택하기, 셀 값 가져오기, 셀 값 바꾸기

 

관련 글

2012/12/10 - [Excel VBA] - 01 엄마도 따라 할 수 있는 Excel VBA - 시작

2012/12/10 - [Excel VBA] - 02 엄마도 따라 할 수 있는 Excel VBA - Range 사용하기

 

01셀 선택하기

엑셀은 셀 단위로 작업을 하기 때문에 '엑셀VBA'는 셀을 선택하고 선택된 셀에 내용을 추가, 수정, 삭제 하는 기능이라고 할 수 있습니다.

 

셀 선택하고 내용 추가하기

위와 같이 화면을 반반씩 배치하고 따라해 보시기바랍니다. 왼쪽에 편집한 소스코드가 실제 엑셀 시트에 어떤 영향을 미치는지 바로 확인할 수 있습니다.

 

아래 소스코드를 위와 같이 추가한 후 위에 '실행'버튼을 눌러보세요. 아니면 F5버튼을 눌러도 됩니다.

셀을 선택하는 기능(method)은 '.Select'입니다.

 

Cells라는 요소(property)를 통해 각자 선택하고 싶은 셀을 선택합니다. 그리고 그 셀을 '선택(Select)'하라는  명령을 내려봅시다.

Sub 셀에내용추가하기()
    행 = 1
    열 = 1 

    '셀 선택하기
    Cells(행, 열).Select
  

    '셀에 내용 추가하기
    Selection.Value = 100

End Sub

위 코드는 1행 1열을 선택한 후 100이라는 값을 입력하라는 코드 입니다.

 

아래 A1열에 100이라고 출력 되었습니다.

 

그러면 2행 3열에 '2행 3열'이라는 글자를 입력하려면 어떻게 해야 할까요? VBE를 열어놓고 잠시 생각해보고 스크롤을 내려볼게요.

 

아래와 같이 하시면 됩니다.

Sub 셀에내용추가하기()
	행 = 2
	열 = 3

	'셀 선택하기
  	Cells(행, 열).Select

	'셀에 내용 추가하기
	Selection.Value = "2행 3열"
End Sub 

위와 같이 입력하면 됩니다. 

 

 

소스코드 설명

소스코드 설명 'Cells(행, 열).Select' 라고 되어 있는 부분을 보겠습니다.

Cells() 라는 함수입니다. 이 함수에 '행'과 '열'을 입력해 주면 해당하는 셀을 가지고 옵니다.

Cells(10, 9) 이렇게 쓰면 10행 9열을 가리킵니다.

 

Cells(10, 9).Select 라고 하면 10행 9열을 '선택(Select)'하라는 거에요.
그러면 Cells(10, 9).Clear 은 무엇일까요?

 

맞습니다.

10행 9열을 지우라는 것이죠.

 

 

응용1

그러면 2행 3열에 있는 값을 '값을 수정하자'로 바꾸려면 어떻게 해야 할까요? 앞장에서 배운걸 응용하면 됩니다.

Cells(10, 9).Value = "값을 수정하자"

 

 

 

02 셀 값 가져오기

특정 셀의 값을 가져오는 것을 해볼게요.

B2셀에 있는 값을 A11셀로 가져와 보겠습니다.

 

소스코드는 아래와 같습니다.

Sub 값가져오기()
  'B2셀에 있는 값을 가져다가 A11셀에 입력 
  Range("A11").Value = Range("B2").Value 
End Sub 

 

응용2

'10행 3열'에 있는 값을 '3행 3열'로 복사 해볼게요

Cells(10, 9).Value = "값을 수정하자"

 

Cells(3, 3).Value = Cells(10, 3).Value

 

 

 

 

end.