The lists are basically just 2 very long list of invoice numbers, both on the same spreadsheet.Would like to be able to see what invoices in list1 are still shown in list2. Hope I've explained ok. Thanks
Open the workbook. ALT+F11 to open the Visual Basic Editor, Insert Module. Copy the code below and paste it in.
Sub Dups() Dim iListCount As Integer, iCtr As Integer, x As Range Application.ScreenUpdating = False iListCount = Sheets("sheet1").Range("D1:D7495").Rows.Count For Each x In Sheets("Sheet1").Range("A1:A5490") For iCtr = 1 To iListCount If x.Value = Sheets("Sheet1").Cells(iCtr, 4).Value Then Sheets("Sheet1").Cells(iCtr, 1).Font.ColorIndex = 3 x.Font.ColorIndex = 3 End If Next iCtr Next x Application.ScreenUpdating = True MsgBox "Done!" End Sub
Close (X) the Visual Basic Editor. Tools > Macro > Macros, click on Dups then click the Run button.
The macro should highlight all duplicates in both lists in red.