엑셀 선택된 셀 실시간 강조

실습 가이드

엑셀의 조건부서식과 네 개의 기본 함수를 조합하면 현재 선택된 셀이 속한 행과 열을 자동으로 강조할 수 있습니다. 조건부서식의 기본 개념과 다양한 실전 예제는 아래 기초입문강의 '조건부서식의 모든 것' 영상강의에서 자세히 다루었습니다.

1. 강조 효과를 적용할 범위를 선택한 뒤 [홈] - [조건부서식] - [새 규칙] 메뉴로 이동합니다.

   

2. [새 서식 규칙] 대화상자가 열리면 규칙 유형 목록에서 '수식을 사용하여 서식을 지정할 셀 결정'을 선택한 뒤, 아래 수식을 그대로 복사하여 서식 지정 입력란에 붙여넣습니다.
   =OR(CELL("ROW")=ROW(),CELL("COL")=COLUMN())

   

3. [서식] 버튼을 눌러 셀 서식 창을 열고 선택된 셀을 강조할 때 표시할 서식을 지정합니다. 예시에서는 [채우기]를 하늘색, [테두리]를 파란 점선, [글꼴]을 굵게 설정했습니다.

   

4. [확인] 버튼을 눌러 조건부서식 적용을 마칩니다.
   
5. 조건부서식이 적용된 범위 안에서 임의의 셀을 선택합니다.

   

6. 키보드의 F9 키를 눌러 시트를 다시 계산하면 선택된 셀의 행과 열이 강조됩니다.

   

조건부서식과 함수만으로 선택된 셀을 강조하면 셀을 옮길 때마다 F9 키를 눌러야 하므로 다소 번거롭습니다. 따라서 선택된 셀이 실시간으로 강조되도록 만들려면 시트에 한 줄짜리 매크로를 추가하여 자동 재계산을 처리하면 됩니다.

1. [개발도구] - [Visual Basic]을 클릭하거나 단축키 Alt + F11을 눌러 매크로 편집기를 실행합니다. 리본에 [개발도구] 탭이 보이지 않는다면 아래 개발도구 활성화 관련 포스트를 먼저 확인하세요.
   
2. 매크로 편집기 왼쪽 창에서 현재 통합 문서의 시트 목록을 확인할 수 있습니다. 실시간 강조를 적용할 시트를 더블클릭하여 코드 입력창을 엽니다.

   

3. 아래 명령문을 복사한 뒤, 오른쪽 코드 입력창에 그대로 붙여넣습니다.

   Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    
   If Target.FormatConditions.Count > 0 Then Me.Calculate
    
   End Sub

   

4. 시트로 돌아가 셀을 클릭하면 선택된 셀의 행과 열이 즉시 강조되는 것을 확인할 수 있습니다.

   

조건부서식에 사용한 선택된 셀 강조 공식의 동작 원리는 다음과 같습니다.

1. ROW 함수와 COLUMN 함수는 함수가 입력된 셀의 행 번호와 열 번호를 반환합니다.

   

2. CELL 함수는 함수가 입력된 셀이 아니라 현재 활성화된 셀의 정보를 반환합니다. CELL 함수의 인수로 "ROW" 또는 "COL"을 사용하면 활성화된 셀의 행 번호와 열 번호를 각각 가져올 수 있습니다.

   

3. 따라서 아래 수식을 입력하면 수식이 입력된 셀의 행 번호와 현재 활성화된 셀의 행 번호가 같을 때에만 TRUE가 반환됩니다.
   CELL("ROW")=ROW()
4. 조건부서식에 입력했던 공식을 시트에 직접 입력해 보면 현재 활성화된 셀(=선택된 셀)과 같은 행 또는 열에 속한 셀에서만 TRUE가 반환되는 것을 확인할 수 있습니다. 결과값이 TRUE인 셀에 조건부서식의 서식이 적용되면서 선택된 셀의 행과 열이 강조됩니다.

   

자주묻는질문

질문1. 선택된 행만 강조하려면 어떻게 해야 하나요?

선택된 행만 강조하려면 조건부서식에 아래 수식을 입력합니다.

질문2. 값이 입력된 셀에서만 강조하려면 어떻게 하나요?

선택한 셀에 값이 입력된 경우에만 행과 열을 강조하려면 조건부서식에 아래 수식을 사용합니다. 이 수식을 적용하면 빈 셀을 선택했을 때에는 강조 효과가 표시되지 않습니다.

질문3. 셀을 선택하면 복사해 둔 범위가 해제됩니다. 어떻게 해결해야 하나요?

엑셀 매크로가 한 번 실행되면 그 직전까지의 작업 기록이 모두 초기화되므로, 복사 모드 역시 함께 해제됩니다.

따라서 다른 값이 복사된 상태에서는 매크로가 실행되지 않도록 시트 이벤트 명령문을 아래와 같이 수정하면 됩니다.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
 
If Application.CutCopyMode = False And Target.FormatConditions.Count > 0 Then Me.Calculate
 
End Sub

이번 강의에 사용된 기초함수 목록