If errors are expected and you doesn't get one, you might turn off the On
Error Resume Next statement...

I wrote the function wrong, instead it's:

Text = Replace(Text, ar(i), ReplaceBy, , , vbTextCompare)

--
Best regards
Michael Bauer - MVP Outlook

: Outlook Categories? Category Manager Is Your Tool:
: http://www.vboffice.net/product.html?pub=6&lang=en


Am Tue, 20 May 2008 14:29:44 -0700 (PDT) schrieb ExcelLars:

No error, but your code will not replace illegal text.