If you change the table #, the code will not check for acronyms occurring anywhere before that table.
You would only swap strDef & strFnd around in:
.Last.Cells(1).Range.Text = strDef
.Last.Cells(2).Range.Text = strFnd
if you want to change the output columns for the definitions and their acronyms.
PS: When posting code, please use the code tags, indicated by the # button on the posting menu. Without them, your code loses much of whatever structure it had.
__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]
|