두 열을 비교하고 Excel에서 일치하지 않는 데이터를 강조 표시하려면 어떻게 해야 하나요?

아래 스크린샷에 나와 있는 것처럼, 인접한 두 열의 셀을 비교하고 일치하지 않는 데이터를 강조 표시하려면 이 문서의 방법들을 시도해 볼 수 있습니다.

VBA 코드를 사용하여 두 열을 비교하고 일치하지 않는 데이터 강조 표시하기
Kutools for Excel을 사용하여 두 열을 비교하고 일치하지 않는 데이터 강조 표시하기

VBA 코드를 사용하여 두 열을 비교하고 일치하지 않는 데이터 강조 표시하기

위 스크린샷과 같이, 열 A와 열 B의 데이터를 비교하고 있습니다. 일치하지 않는 데이터를 강조 표시하기 위해 다음 VBA 코드를 실행하세요.

1. Alt + F11 키를 동시에 눌러 Microsoft Visual Basic for Applications 창을 엽니다.

2. Microsoft Visual Basic for Applications 창에서 삽입 > 모듈을 클릭합니다. 그런 다음 다음 코드를 코드 창에 복사하여 붙여넣습니다.

VBA 코드: 두 열을 비교하고 일치하지 않는 데이터 강조 표시하기

Sub Dyeware()
    Dim xRg1 As Range
    Dim xRg2 As Range
    Dim xTxt As String
    Dim xCell1 As Range
    Dim xCell2 As Range
    Dim I As Long
    Dim J As Integer
    Dim xLen As Integer
    Dim xDiffs As Boolean
    On Error Resume Next
    If ActiveWindow.RangeSelection.Count > 1 Then
      xTxt = ActiveWindow.RangeSelection.AddressLocal
    Else
      xTxt = ActiveSheet.UsedRange.AddressLocal
    End If
lOne:
    Set xRg1 = Application.InputBox("Range A:", "Kutools for Excel", xTxt, , , , , 8)
    If xRg1 Is Nothing Then Exit Sub
    If xRg1.Columns.Count > 1 Or xRg1.Areas.Count > 1 Then
        MsgBox " Multiple ranges or columns have been selected ", vbInformation, "Kutools for Excel"
        GoTo lOne
    End If
lTwo:
    Set xRg2 = Application.InputBox("Range B:", "Kutools for Excel", "", , , , , 8)
    If xRg2 Is Nothing Then Exit Sub
    If xRg2.Columns.Count > 1 Or xRg2.Areas.Count > 1 Then
        MsgBox "Multiple ranges or columns have been selected", vbInformation, "Kutools for Excel"
        GoTo lTwo
    End If
    If xRg1.CountLarge <> xRg2.CountLarge Then
       MsgBox "Two ranges must have the same numbers of cells ", vbInformation, "Kutools for Excel"
       GoTo lTwo
    End If
    xDiffs = (MsgBox("Click Yes to highlight matched data, click No to highlight unmatched data ", vbYesNo + vbQuestion, "Kutools for Excel") = vbNo)
    Application.ScreenUpdating = False
    xRg2.Interior.ColorIndex = xlNo
    xRg1.Interior.ColorIndex = xlNo
    For I = 1 To xRg1.Count
        Set xCell1 = xRg1.Cells(I)
        Set xCell2 = xRg2.Cells(I)
        If xCell1.Value = xCell2.Value Then
            If Not xDiffs Then
                xCell1.Interior.Color = vbRed
                xCell2.Interior.Color = vbRed
            End If
        Else
            If xDiffs Then
                xCell1.Interior.Color = vbRed
                xCell2.Interior.Color = vbRed
            End If
        End If
    Next
    Application.ScreenUpdating = True
End Sub

3. F5 키를 눌러 코드를 실행합니다. 나타나는 Kutools for Excel 대화 상자에서 비교할 첫 번째 열을 선택한 후 확인 버튼을 클릭합니다. 스크린샷 참조.

4. 그런 다음 다음에 나타나는 Kutools for Excel 대화 상자에서 비교할 두 번째 열을 선택합니다.

5. 아래 스크린샷과 같은 대화 상자에서 일치하지 않는 데이터를 강조 표시하려면 아니요 버튼을 클릭합니다.

그러면 두 열 간의 모든 일치하지 않는 데이터가 즉시 강조 표시됩니다. 스크린샷 참조:

Kutools for Excel을 사용하여 두 열을 비교하고 일치하지 않는 데이터 강조 표시하기

특정 열의 셀 값이 다른 열에 존재하는지 여부를 확인하고 강조 표시하려는 경우, 예를 들어 아래 스크린샷과 같이 열 A의 숫자 2가 열 B에 존재하지 않는 경우, Kutools for Excel의 범위 비교 기능을 사용해 볼 수 있습니다.

1. Kutools > 삽입 > 동일 및 다른 셀 선택을 클릭합니다. 스크린샷 참조:

2. 동일 및 다른 셀 선택 대화 상자에서 다음과 같이 설정해야 합니다:

3. 그런 다음 열 A에는 있지만 열 B에는 없는 셀의 개수를 알려주는 대화 상자가 나타납니다. 확인 버튼을 클릭하면 열 A에서 모든 일치하는 셀이 선택됩니다.

관련 기사:

• Excel에서 두 문자열의 유사성을 비교하거나 차이점을 강조 표시하려면 어떻게 해야 하나요?
• Excel에서 두 문자열(대소문자 구분)을 정확히 비교하려면 어떻게 해야 하나요?