Matching cells and color the matching cells

[Guzzlr]

Range("B:B,D:D").Select
    Range("D1").Activate
    Selection.FormatConditions.AddUniqueValues
    Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
    Selection.FormatConditions(1).DupeUnique = xlDuplicate
    With Selection.FormatConditions(1).Font
        .Color = -16383844
        .TintAndShade = 0
    End With
    With Selection.FormatConditions(1).Interior
        .PatternColorIndex = xlAutomatic
        .Color = 13551615
        .TintAndShade = 0
    End With
    Selection.FormatConditions(1).StopIfTrue = False

Hello All.
I ran the recorder to find duplicate values and color based upon a conditional. This is not the way I really wanted.
Problem: I have letters/numbers in column B. I wish to match the column B with letters/numbers in column D. However, it is not an exact match.
For example, the letter/number in column B may be ACI-5, which almost matches ACI-5(G) in column D.
Because it is an approximate match, both cells in Column B and Column D will be colored RGB 248, 56, 132.
I originally thought about using a vlookup application, but I don't believe that is the way to go.
Any thoughts would be greatly appreciated.
Thanks for the help

 

[Guzzlr]

Let me work on this and report back
Thank you