Excel 2013 here - and am attempting to match the value in cell D to the value in cell C. The part that is leaving me pulling my hair out, is the fact that if a single word exists in column C it should be removed from column D.

For example

```
Column C          Column D
Red Hairy Hats    Hairy Cowpies

```

Since both fields contain the word `Hairy` it should be updated to read like so

```
Column C          Column D
Red Hairy Hats    Cowpies

```

I can not uncover how to do a wildcard match on string comparison in Excel VBA. I have this syntax which does an **Exact** match, but how could I do single words from the string like in my example above?

```
Dim i As Long
Dim resArry
dataArry = Cells(1).CurrentRegion
ReDim resArry(UBound(dataArry, 1) - 1, 1)
For i = 2 To UBound(dataArry, 1)
    If InStr(1, dataArry(i, 3), dataArry(i, 4), vbBinaryCompare) Then
        resArry(i - 2, 0) = ""
    Else
        resArry(i - 2, 0) = dataArry(i, 4)
    End If
Next

Range("D2").Resize(UBound(resArry, 1)) = resArry

```