Find unique occurrence of names across a number of columns

Can you upload an example workbook showing your layout of data structure and your expected output?

Hi,

The following code will interrogate the cells in the range A1:E11 and generate a list in column H of values that only occur once in that range.

Sub a()
Dim rSource As Range
Dim rCell As Range
Dim iCount As Integer

Set rSource = Range("A1:E11")

For Each rCell In rSource
If Application.WorksheetFunction.CountIf(Range("H:H"), rCell.Value) = 0 And Application.WorksheetFunction.CountIf(rSource, rCell) = 1 Then
Range("H" & Rows.Count).End(xlUp).Offset(1, 0).Value = rCell.Value
End If
Next rCell

End Sub

Error posting. Apologies

The CountIf(H:H is there to check that the current cell isn't in the unique list already.

To corrct the row that the unique list occupies, replace this:

Range("H" & Rows.Count).End(xlUp).Offset(1, 0).Value = rCell.Value

with this:

If Range("H1").Value = "" Then Range("H1").Value = rcell.Value Else Range("H" & Rows.Count).End(xlUp).Offset(1, 0).Value = rcell.Value