How to tidy symbols after VBA

I'm using

Please Login or Register  to view this content.

to search for and delete all words composed solely of capital letters.

It works fine , but does leave behind unwanted apostrophes / question marks / exclamation marks / full stops / Colons and so on.

For example

HOW is completely cleared.

HOW? leaves ?

HOW! leaves !

HOW'S leaves 'S

and so on.

Can someone advise how to amend my VBA to also remove remaining punctuation and other symbols from the target words?

Grateful for any advice.

May be...

Please Login or Register  to view this content.

Ok thanks for getting back

I'm trying

Please Login or Register  to view this content.

and getting 'search item not found' messages.

I'll attach the file I'm practising on. I'm using the same word in the file as in the post above , but the VBA needs to apply of course to any word made up of capital letters.

Thanks for your help.

Oh I had extra [ at the start.

Ok Thanks. I had another go , this time with

Please Login or Register  to view this content.

and still get 'search item not found' messages.

I tried with the 'match case' and 'use wildcards' switches on and off , but no joy I'm afraid.

Oh I thought you were using RegEx. That's not the case?

This is the VBA I'm using presently :

Please Login or Register  to view this content.

This leaves the random punctuation marks and so on that I'd like to eradicate.

I can run search

Please Login or Register  to view this content.

with no replace element direct from the search and replace interface. Maybe I'm overlooking something. Grateful for your advice.

Try:
.Text = "<[A-Z]{2}[! ^13]@([ ^s^13])"
.Replacement.Text = \1

The above ensures any word starting with at least two capitals and all subsequent characters up to the next following space or paragraph break (whichever comes first) are deleted. This will capture any apostrophes & punctuation.

Excellent - thanks. It works fine.

Grateful for your time and expertise.