Hi cegbuna,

For the data you've indicated, a wildcard Find/Replace should do the job, with:
Find = (')([0-9A-Za-z]{1,})([',]{1,2})
Replace = \2^p

The above will find any alphanumeric string preceded by a single quote and succeeded by a single quote and/or a comma, and delete everything except the alphanumeric string, which it then succeeds with a paragraph break. No vba required.

__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]

How and where do I enter that code?

I am trying to convert the tabulated data into the ('****','****',...etc) format.

Thanks

Well, since it's for a Find/Replace, you should enter it into Word's Find/Replace dialogue box ... (and do remember to choose the wildcards option)

__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]

I tried the code and it didn't work.

Thanks for the response.