배움터  
  HOME > 배움터 > 무료강좌
무료강좌
 
엑셀 2000, 황기성님의 엑셀VBA 2일, Excel 2000
excelvbalogo.gif (3602 bytes)
고급필터를 이용한 데이터 검색기능을 VBA로 자동화 하기 (2)

 


⑥ 만약 화면에 그리기 도구 모음이 나타나 있지 않다면, 표준 도구 모음에서 그리기 단축 아이콘을 눌러 그리기 도구 모음을 활성화시킵니다.

d_8.gif(20004바이트)

강좌에 포함된 축소된 그림은 클릭하시면 확대해서 보실 수 있습니다.

⑦ [그리기 도구 모음]에서 [개체선택] 단축 아이콘을 누른 다음, 마우스로 워크시트 상에 옵션 버튼을 모두 선택하고, [그리기 도구 모음]에서 [그리기(R)], [맞춤/배분]을 선택하고, [왼쪽 맞춤(L)]과 [세로 간격을 동일하게(V)]를 차례로 선택하여 워크시트에 삽입한 옵션 버튼을 가지런하게 정렬합니다.

팁! Shift 키나 Ctrl 키를 누른 상태에서 개체를 선택하면, 여러 개체를 한꺼번에 선택할 수 있다. 워크시트에서 여러 영역의 셀을 선택하는 것과 같은 요령입니다.

d_9.gif(23532바이트)

⑧ 마찬가지로 워크시트상의 옵션버튼을 모두 선택한 상태에서 마우스 오른쪽 버튼을 눌러 빠른 메뉴를 부른 다음, [컨트롤 서식]메뉴를 선택한 다음, 개체 서식 대화 상자에서 컨트롤 탭을 선택하고, [3차원 음영]에 체크하고, [셀 연결(L)]항목에서 조건!$B$1을 입력합니다.

d_10.gif(19501바이트)

이제 이 옵션 버튼은 '조건' 시트의 B1셀과 연결된 것입니다. 5개의 옵션 버튼 가운데, 몇 번째 옵션 버튼이 선택되었는가 하는 것이 '조건' 워크시트의 B1셀에 숫자로 나타나게 됩니다. 만약 3이란 숫자가 입력된다면 3번째 옵션 버튼을 사용자가 선택한 것입니다.

⑨  옵션 버튼을 차례로 선택한 뒤, 마우스 오른쪽 버튼을 눌러 [텍스트 편집(X)]을 선택한 뒤, 옵션 버튼의 캡션을 차례로, '접속번호로 검색', '계약자로 검색', '가입자로 검색', 'ID로 검색', '주민번호로 검색'이라고 수정합니다.

d_11.gif(22480바이트)

팁! 옵션 버튼 캡션은 개체를 선택한 뒤, 마우스로 한 번 클릭하여 수정할 수도 있습니다. 

⑩ 다시 옵션 단추 개체를 모두 선택한 다음, 마우스 오른쪽 단추를 눌러 빠른 메뉴에서 [그룹 만들기(G)]에서 [그룹]을 선택해, 선택한 개체를 하나로 묶습니다. 

d_12.gif(23778바이트)

팁! 워크시트에 있는 개체로 이동하기 위해서는 [편집]메뉴의 [이동]을 선택한 뒤, [옵션]에서 [개체]를 선택하고 확인 단추를 눌러도 된다. 

⑪ 그룹으로 묶은 옵션 버튼들을 A열과 1행쪽으로 옮기고 마우스를 이용해 크기를 적당하게 줄입니다. 그리고, 그 크기 만큼의 행을 선택하고 [서식] 도구모음의 [색 채우기(자동)] 아이콘에서 회색 -25%을 선택하여 셀의 내부 색상을 회색으로 변경합니다.

d_13.gif(24759바이트)

⑫ D2:E2 셀을 선택한 뒤, [서식]도구 모음 [테두리]에서 '굵은 상자 테두리'를 선택하고, [색 채우기(자동)] 단축아이콘에서 '채우기 없음'을 선택합니다.

d_14.gif(23001바이트)

⑬ '조건'시트를 선택하고, D1셀에 =INDEX(A1:A5,B1)이라는 수식을 입력합니다. 바로 이 수식을 이용하여, '조건'시트에서 선택한 옵션 버튼에 따라 조건표에서 이용한 필드명을 변경할 수 있으며, 이를 통해 조건을 변경하여 고급필터에서 검색이 가능해집니다. D2셀에는 =검색!D2라는 수식을 입력합니다. '검색' 시트의 D2셀에 사용자가 검색할 조건을 입력하면, 이 셀에 연결되어 고급필터에서 사용할 조건 범위로 이용하게 될 것입니다.

d_15.gif(19922바이트)

⑭ 자, 이제 본격적으로 매크로를 이용하여 업무를 자동화하기 위한 사전 준비 작업을 마쳤습니다. 매크로를 반복적으로 이용하기 위해 먼저, 매크로 기록기로 이를 기록해 봅니다. '검색'시트를 선택한 다음, [도구]메뉴에서 [매크로] [새 매크로 기록(R)]을 차례로 선택합니다.
d_16.gif(20781바이트)

⑮ 매크로 기록창이 나타나면, 여기서는 디폴트 값을 그대로 확인한 뒤, 매크로로 수행하려는 작업을 기록합니다. 우리가 수행하려는 작업은 고급 필터이므로, [데이터] 메뉴에서 [고급 필터(A)]를 선택한 다음, 결과는 다른 장소에 복사, 데이터 범위는, 데이터!$A$1:$U$69를, 조건 범위는, 조건!$D$1:$D$2을, 복사 위치는, 조건!A7을 선택한 다음 확인 단추를 누릅니다.

d_17.gif(20859바이트)

매크로 기록기는 탁월한 VBA 자습서입니다. 이 기록기를 이용하여 누구든 쉽게 VBA와 가까워질 수 있습니다. 그러나 매크로 기록기는 지나치게 친절하여 불필요한 사항까지도 세세하게 기록하므로, 매크로 기록기를 이용해 작업할 때는 불필요한 동작이 끼어 들지 않도록 유의해야 합니다. 많이 불필요한 동작이 많다면, 그 만큼 코드는 어지러워지고 사용자가 추가로 해야 할 작업의 양도 당연히 늘어나게 됩니다.

목차 | 이전 | 다음