View Single Post
 
Old 04-16-2020, 05:43 AM
mrsandes mrsandes is offline Windows 10 Office 2019
Novice
 
Join Date: Apr 2020
Posts: 10
mrsandes is on a distinguished road
Default

Quote:
Originally Posted by macropod View Post
You might try:
.Text = "\([A-Z0-9]*[A-Z0-9]\)"
but, depending on what else you have in parentheses, that may give some false matches.
Yes, it increased significantly the amount of false matches.

Paul, if I were to find also abbreviations that are not enclosed by parenthesis, what else would I have to delete on the code?

I just removed the "\(" and "\)" on the search mechanism, but it gives me an error "Subscript out of range" and highlights the line:

Code:
StrAcronyms = StrAcronyms & Split(StrTmp, "|")(1) & vbTab & Split(StrTmp, "|")(0) & vbCr
Another thing that I noticed is that the AcronymManager macro will not replace the text in the document for the acronym if the text is not capitalized in each word... What I mean is, if I have the acronym Part List (PL) found and listed in the acronyms table, it will update in the document every instance that "Part List" is written, replacing by "PL", but it will not replace the instances where "part list" is written. Would it be possible to change that setting?

Thanks for your help
Reply With Quote