VBA를 사용하여 조건에 따라 Excel 셀 색상을 설정하는 방법은 무엇입니까?

최종 업데이트: 2021년 8월; 마이크로소프트 엑셀 365, 2019, 2016.

오늘의 Excel 자동화용 VBA 자습서에서는 셀 값을 기반으로 셀의 색을 프로그래밍 방식으로 변경하는 방법에 대해 알아봅니다.

예를 들어 간단한 상태 대시보드를 개발할 때 이 기술을 사용할 수 있습니다.

설정

아직 Excel에서 개발하지 않는 경우 Excel 매크로 소개 가이드를 살펴보는 것이 좋습니다 . 특히, Microsoft Excel 리본에서 개발자 탭을 사용할 수 있는지 확인해야 합니다. 이 탭을 사용하여 간단한 코드를 작성할 수 있습니다.

• 마이크로소프트 엑셀을 엽니다. 이 자습서에서 제공하는 코드는 Excel 2007 이상에서 작동할 것으로 예상됩니다.
• 빈 워크시트에 다음 표를 추가합니다.

• 이제 수식 >> 이름 정의를 눌러 명명된 범위를 정의하십시오.

• 확인을 누르십시오

Cell.Interior.Color 값에 따라 셀 내부 색상 변경

• 리본에서 개발자 항목을 누르십시오 .
• Visual Basic 또는 Alt+F11을 눌러 개발자 VBA 편집기를 엽니다.
• 다음으로 코드를 실행하려는 워크시트를 강조 표시합니다. 또는 VBA 코드가 있는 모듈을 선택하십시오.
• 이 코드를 붙여넣으세요. 이 예에서는 셀 범위의 내부 색상을 빨간색, 노란색 및 녹색 색상에 해당하는 특정 셀 RGB 값으로 수정합니다.
• 특히 Excel VBA 메서드 Cell.Interior.Color 를 사용하고 해당 RGB 값 또는 색상 인덱스를 전달합니다.

Sub Color_Cell_Condition()

Dim MyCell As Range
Dim StatValue As String
Dim StatusRange As Range

Set StatusRange = Range("Status")

For Each MyCell In StatusRange

StatValue = MyCell.Value
Select Case StatValue

    Case "Progressing"
    MyCell.Interior.Color = RGB(0, 255, 0)
    
    Case "Pending Feedback"
    MyCell.Interior.Color = RGB(255, 255, 0)
    
    Case "Stuck"
    MyCell.Interior.Color = RGB(255, 0, 0)

End Select

Next MyCell

End Sub

• F5 키를 누르거나 Run >> Run Sub / UserForm을 눌러 코드를 실행합니다.
• 상태 대시보드가 ​​아래와 같이 채워진 것을 확인할 수 있습니다.

• 코드를 저장하고 VBA 편집기를 닫습니다.