filter and replace?

[Iain17]

Use vbTextCompare instead of vbBinaryCompare.

Dim xx$, ZZ$
xx = "Chris. Chang Chiew Thou"
Print xx
xx = Replace(xx, "Chiew", "xxxxx", , , vbTextCompare)
Print xx