Skip to main content

Kutools for Office — 하나의 패키지. 다섯 가지 도구. 더 많은 일을 처리하세요.

Excel에서 셀의 배경 색상 인덱스를 결정하고 식별하는 방법은 무엇입니까?

Author Sun Last modified

아래 스크린샷에 표시된 것처럼 여러 가지 색상의 셀이 포함된 시트를 받았을 때, 경우에 따라 이러한 색상 셀의 배경 색상 인덱스를 식별하려고 할 수 있습니다. 셀의 색상 인덱스를 결정할 수 있는 내장 기능은 없지만, 이 문서에서는 Excel에서 이 작업을 신속히 해결하기 위한 몇 가지 VBA 코드를 소개합니다.
A screenshot showing cells with different background colors in Excel

VBA를 사용하여 셀의 색상 식별하기

VBA를 사용하여 셀의 색상 식별하기

다음 단계에 따라 VBA를 사용하여 셀의 색상을 결정하세요.

1. 다음 키를 누릅니다: Alt + F11 키를 눌러 Microsoft Visual Basic for Applications 창을 활성화합니다.
A screenshot of the Microsoft Visual Basic for Application window in Excel

2. 삽입 > 모듈을 클릭하여 새 모듈을 열고 아래 VBA 코드를 빈 스크립트에 붙여넣습니다. 스크린샷을 참조하세요:

VBA: 셀의 전통적인 16진수 코드 가져오기

Function getRGB1(FCell As Range) As String
'UpdatebyExtendoffice20170714
    Dim xColor As String
    xColor = CStr(FCell.Interior.Color)
    xColor = Right("000000" & Hex(xColor), 6)
    getRGB1 = Right(xColor, 2) & Mid(xColor, 3, 2) & Left(xColor, 2)
End Function
A screenshot showing how to insert a module for VBA
A screenshot of pasted code in the module

3. 코드를 저장하고 VBA 창을 닫습니다. 색상이 지정된 셀 옆의 빈 셀을 선택하고, 이 수식을 입력한 다음, =getRGB1(A16) 자동 채우기 핸들을 드래그하여 사용하려는 셀 위로 이동합니다. 스크린샷을 참조하세요:

A screenshot showing the VBA function entered in a cell to determine color index
A screenshot showing the color hex result

팁: 셀의 색상 인덱스를 식별할 수 있는 다른 코드들도 있습니다.

1. VBA: 각 코드에 대한 10진수 값

Function getRGB2(FCell As Range) As String
   'UpdatebyExtendoffice20170714  
    Dim xColor As Long
    Dim R As Long, G As Long, B As Long
    xColor = FCell.Interior.Color
    R = xColor Mod 256
    G = (xColor \ 256) Mod 256
    B = (xColor \ 65536) Mod 256
    getRGB2 = "R=" & R & ", G=" & G & ", B=" & B
End Function

결과:
A screenshot showing the RGB color values result

2. VBA: 10진수 값

Function getRGB3(FCell As Range, Optional Opt As Integer = 0) As Long
 'UpdatebyExtendoffice20170714
    Dim xColor As Long
    Dim R As Long, G As Long, B As Long
    xColor = FCell.Interior.Color
    R = xColor Mod 256
    G = (xColor \ 256) Mod 256
    B = (xColor \ 65536) Mod 256
    Select Case Opt
        Case 1
            getRGB3 = R
        Case 2
            getRGB3 = G
        Case 3
            getRGB3 = B
        Case Else
            getRGB3 = xColor
    End Select
End Function

결과:
A screenshot showing the entire RGB color code as a long integer result

Excel에서 중복 또는 고유한 값 쉽게 선택하기
Excel에서 데이터 범위를 다루면서 중복 행을 강조하거나 선택해야 한다면, 이 작업을 어떻게 빠르게 처리할 수 있을까요? Kutools for Excel의 중복 및 고유 셀 선택 기능을 사용하면 범위 내에서 중복 또는 고유한 값을 신속하게 선택할 수 있습니다. 또한 이러한 중복 또는 고유한 값에 배경색과 글꼴 색상을 적용하여 데이터를 손쉽게 돋보이게 할 수 있습니다.
Highlight all duplicates with Kutools

Kutools for Excel - 필수적인 300개 이상의 도구로 Excel을 강화하세요. 영구적으로 무료인 AI 기능을 활용하세요! 지금 바로 구매하기

관련 기사:

최고의 오피스 생산성 도구

🤖 Kutools AI 도우미: 데이터 분석에 혁신을 가져옵니다. 방법: 지능형 실행   |  코드 생성  |  사용자 정의 수식 생성  |  데이터 분석 및 차트 생성  |  Kutools Functions 호출…
인기 기능: 중복 찾기, 강조 또는 중복 표시   |  빈 행 삭제   |  데이터 손실 없이 열 또는 셀 병합   |   반올림(수식 없이) ...
슈퍼 LOOKUP: 다중 조건 VLOOKUP  |   다중 값 VLOOKUP  |   다중 시트 조회   |   퍼지 매치 ....
고급 드롭다운 목록: 드롭다운 목록 빠르게 생성   |  종속 드롭다운 목록   |  다중 선택 드롭다운 목록 ....
열 관리자: 지정한 수의 열 추가  |  열 이동  |  숨겨진 열의 표시 상태 전환  |  범위 및 열 비교 ...
추천 기능: 그리드 포커스   |  디자인 보기   |   향상된 수식 표시줄   |  통합 문서 & 시트 관리자   |  자동 텍스트 라이브러리   |  날짜 선택기   |  데이터 병합   |  셀 암호화/해독   |  목록으로 이메일 보내기   |  슈퍼 필터   |   특수 필터(굵게/이탤릭/취소선 필터 등) ...
15대 주요 도구 세트: 12 가지 텍스트 도구(텍스트 추가, 특정 문자 삭제, ...)  |  50+ 종류의 차트(간트 차트, ...)  |  40+ 실용적 수식(생일을 기반으로 나이 계산, ...)  |  19 가지 삽입 도구(QR 코드 삽입, 경로에서 그림 삽입, ...)  |  12 가지 변환 도구(단어로 변환하기, 통화 변환, ...)  |  7 가지 병합 & 분할 도구(고급 행 병합, 셀 분할, ...)  |  ... 등 다양
Kutools는 사용자가 선호하는 언어로 이용할 수 있습니다 – 영어, 스페인어, 독일어, 프랑스어, 중국어 및40개 이상의 언어 지원!

Kutools for Excel과 함께 엑셀 능력을 한 단계 끌어 올리고, 이전에 없던 효율성을 경험하세요. Kutools for Excel은300개 이상의 고급 기능으로 생산성을 높이고 저장 시간을 단축합니다.  가장 필요한 기능을 바로 확인하려면 여기를 클릭하세요...

Office Tab은 Office에 탭 인터페이스를 제공하여 작업을 더욱 간편하게 만듭니다

  • Word, Excel, PowerPoint에서 탭 편집 및 읽기를 활성화합니다.
  • 새 창 대신 같은 창의 새로운 탭에서 여러 파일을 열고 생성할 수 있습니다.
  • 생산성이50% 증가하며, 매일 수백 번의 마우스 클릭을 줄여줍니다!

모든 Kutools 추가 기능. 한 번에 설치

Kutools for Office 제품군은 Excel, Word, Outlook, PowerPoint용 추가 기능과 Office Tab Pro를 한 번에 제공하여 Office 앱을 활용하는 팀에 최적입니다.

Excel Word Outlook Tabs PowerPoint
  • 올인원 제품군 — Excel, Word, Outlook, PowerPoint 추가 기능 + Office Tab Pro
  • 설치 한 번, 라이선스 한 번 — 몇 분 만에 손쉽게 설정(MSI 지원)
  • 함께 사용할 때 더욱 효율적 — Office 앱 간 생산성 향상
  • 30일 모든 기능 사용 가능 — 회원가입/카드 불필요
  • 최고의 가성비 — 개별 추가 기능 구매 대비 절약