Hi Chris,
The following code in a macro would delete the tags and apply bold
formatting to the text between the tags:
Selection.HomeKey wdStory
Selection.Find.ClearFormatting
With Selection.Find
Do While .Execute(FindText:="\<(STRONG\>)(*)\</\1",
MatchWildcards:=True, ReplaceWith:="\2", Wrap:=wdFindContinue,
Forward:=True) = True
Selection.Range.Font.Bold = True
Loop
End With
See the article "Finding and replacing characters using wildcards" at:
http://www.mvps.org/word/FAQs/General/UsingWildcards.htm
for and explanation of what the FindText string means.
You will need a similar routine to apply whatever other formatting is
required by other tags.
--
Please post any further questions or followup to the newsgroups for the
benefit of others who may be interested. Unsolicited questions forwarded
directly to me will only be answered on a consulting basis.
Hope this helps
Doug Robbins - Word MVP