Excel VBA에서 변경된 셀을 채색하고 이해하기 쉽습니다.

2832 단어 VBAExcelExcelVBA

Excel VBA에서 변경된 셀을 채색하고 이해하기 쉽습니다.



시트의 데이터가 많을 때, 어딘가 1개 셀을 수정했는지를 찾는 것이 힘들 때가 있습니다.

자주 있는 것이, Excel 데이터를 갱신해, 메일로 되돌려 받을 때에, 변경된 부분을, 하이라이트로 일부러 색칠하는 것은 수고가 있다.

상당히 단순하지만 셀을 변경하면 셀에 색을 붙여 변경한 셀을 알기 쉽도록 해 보았다.


VBA 매크로


Dim refValue

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    refValue = Range(Target.Address).Value
End Sub

Private Sub Worksheet_Change(ByVal Target As Range)
    If refValue <> Range(Target.Address).Value Then
        With Range(Target.Address).Interior
            .Pattern = xlSolid
            .PatternColorIndex = xlAutomatic
            .Color = 65535
            .TintAndShade = 0
            .PatternTintAndShade = 0
        End With
    End If
End Sub

좋은 웹페이지 즐겨찾기