Unmatched coparing two Columns Tab1 with two Columns Tab2

Hi.
The code below was developed by tigeravatar, i try adapt to use only two sheets, but i need compare two columns (concatenated) of "Orig" tab with two columns (concatenated) tab "Result"

costume 2712 is different costume 27diff then copy this line to Result tab.

Option Explicit
Sub GetUnmatched()
'Created by: tigeravatar
'http://www.excelforum.com/excel-programming-vba-macros/774778-excel-vba-find-unmatched.html
'http://www.excelforum.com/excel-programming-vba-macros/1026172-excel-vba-find-unmatched-id-number-and-copy-the-whole-row.html

    Dim ResultSheet As String:          ResultSheet = "Result"   'Here I adapted only between two tabs
    Dim FirstSheet As String:           FirstSheet = "Result"
    Dim SecondSheet As String:          SecondSheet = "Orig"
    Dim FirstSheetDataCol As String:    FirstSheetDataCol = "E"  'How use column E and J here?
    Dim SecondSheetDataCol As String:   SecondSheetDataCol = "E" 'How use column E and J here?
    
    Dim rngData1 As Range:  Set rngData1 = Sheets(FirstSheet).Range(FirstSheetDataCol & "2:" & Sheets(FirstSheet).Cells(Rows.Count, FirstSheetDataCol).End(xlUp).Address)
    Dim rngData2 As Range:  Set rngData2 = Sheets(SecondSheet).Range(SecondSheetDataCol & "2:" & Sheets(SecondSheet).Cells(Rows.Count, SecondSheetDataCol).End(xlUp).Address)
    
    Dim aCell As Range
    For Each aCell In rngData2
        If rngData1.Find(aCell.Value) Is Nothing Then
            Sheets(ResultSheet).Range("A" & Rows.Count).End(xlUp).Offset(1, 0).EntireRow.Value = aCell.EntireRow.Value
        End If
    Next aCell
    
End Sub