Es gibt ein paar Möglichkeiten dies zu tun, ich benutze gerne VBA ein sehr einfaches Beispiel ist:
Sub Macro1()
Dim Sheet1 As Worksheet, sheet2 As Worksheet
Dim result As Long, result2 As Long
Dim duplicated As Boolean
Dim fstrst As Long, lstrst As Long
Set Sheet1 = Workbook1 ' add your workbook here like this
Set sheet2 = Workbook2 ' Workbooks("testbook").Sheets("sheet1")
' this says count the values from row 1 to the end of the data
fstrst = 1
lstrst = Sheet1.Range("A" & Rows.Count).End(xlUp).Row
For result = fstrst To lstrst
duplicated = False
For result2 = fstrst To lstrst
If Sheet1.Cells(result, 3) = sheet2.Cells(result2, 3) Then
duplicated = True
Exit For
End If
Next result2
If duplicated = True Then
' if there are any matching values then duplicated will appear in column C
Sheet1.Cells(result, 3).Interior.ColorIndex = duplicated
End If
Next result
End Sub
Dies vergleicht mehrere Arbeitsmappen und gibt einen Wert zurück, der auf Duplikaten basiert. Er kann jedoch geändert werden, um mehr Spalten zu vergleichen, andere Werte zurückzugeben oder die Duplikation zu löschen
Ein auf Arbeitsblättern basierendes Beispiel könnte ein Lookup mit einer eingebetteten if-Formel verwenden, um bestimmte Kriterien zu überprüfen, z. B. = IF (VLOOKUP (A4, Sheet2! A: B, 1,0), "Duplicated", ""). Dies würde Ihnen mitteilen, ob Alles wurde dupliziert und wenn nicht, wird nichts angezeigt. Aber alles hängt davon ab, was Sie sehen möchten.
Ich hoffe es hilft
Tom