Microsoft Excel에서 VBA를 사용하여 값의 검증에 따라 설정 배경 색상
질문 :
공식 값의 입력 또는 변경의 경우 이전 값이있는 증명이 시작됩니다. 새 셀 값이 더 높으면 배경색이
로 변경됩니다. === 답변 :
아래 코드를 표준 모듈에 넣으세요
Private Sub Worksheet_Calculate()
Dim rng As Range, rngAct As Range
Set rng = Me.UsedRange
With Worksheets("Dummy")
For Each rngAct In rng.Cells
If rngAct.Value < .Range(rngAct.Address).Value Then
rngAct.Interior.ColorIndex = 6
ElseIf rngAct.Value > .Range(rngAct.Address).Value Then
rngAct.Interior.ColorIndex = 3
End If
Next rngAct
.Range(rng.Address).Value = rng.Value
End With
End Sub
Sub OutOfOn()
With Worksheets("Dummy")
If .Visible = True Then .Visible = xlVeryHidden Else .Visible = True
End With
End Sub