엑셀 파일에서 특정 셀에 있는 값에 따라서 조건부 서식을 적용하는 매크로

엑셀 파일을 엽니다.
[개발] 탭에서 [Visual Basic]을 클릭합니다.
[삽입] -> [모듈] 을 클릭하여 새 모듈을 추가합니다.
다음 코드를 입력합니다.

Sub 조건부_서식_적용()
    ' 조건부 서식 매크로
    
    Dim ws As Worksheet
    Dim applyRange As Range
    Dim cell As Range
    
    ' 적용할 범위 지정
    Set ws = ThisWorkbook.Sheets("Sheet1")
    Set applyRange = ws.Range("A1:C10")
    
    ' 조건부 서식 적용
    For Each cell In applyRange
        If cell.Value > 50 Then
            cell.Interior.ColorIndex = 3 ' 빨강색 배경 적용
            cell.Font.Bold = True ' 글자 굵게 적용
        Else
            cell.Interior.ColorIndex = xlNone ' 배경색 제거
            cell.Font.Bold = False ' 굵은 글꼴 제거
        End If
    Next cell
    
End Sub

매크로를 실행하려면 [F5] 키를 누르거나, 개발 탭에서 매크로 이름을 선택한 후 [실행]을 클릭합니다.
이제 "Sheet1" 시트에서 A1:C10 범위의 데이터 중 50보다 큰 값이 있는 셀에는 빨강색 배경과 굵은 글꼴이 적용되고, 그렇지 않은 셀은 배경색과 굵은 글꼴이 제거됩니다. 이와 같이 매크로를 사용하면 엑셀 파일에서 원하는 조건부 서식을 쉽게 적용할 수 있습니다.