#16
|
||||
|
||||
Quote:
Code:
StrTmp = Replace(Replace(Replace(.Text, " (", "("), "(", "|"), ")", "") Quote:
.MatchCase = True to: .MatchCase = False
__________________
Cheers, Paul Edstein [Fmr MS MVP - Word] |
#17
|
|||
|
|||
Quote:
That change has a side effect of replacing the first instance of the acronym to all uppercase letters definition, so the first instance looks like: PARTS LIST (PL). Would you be aware of something to go around it? |
#18
|
||||
|
||||
Quote:
Quote:
.MatchCase = True before: .Replacement.Text = StrExp & " (" & StrAcc & ")"
__________________
Cheers, Paul Edstein [Fmr MS MVP - Word] |
|
Similar Threads | ||||
Thread | Thread Starter | Forum | Replies | Last Post |
Creating a list of Acronyms / Abbreviations | daithy | Word | 4 | 03-12-2020 01:52 PM |
Data Validation in Microsoft Word Template | BradleyCase | Word VBA | 1 | 07-16-2019 12:37 PM |
Adding Professional Credential Abbreviations to Name | dyny723 | Outlook | 0 | 03-16-2018 07:14 AM |
Automate Job application word doc to Excel (with data validation) | dylansmith | Office | 1 | 02-11-2018 12:58 PM |
validation email address in word text filed | sameerahmad_P | Word VBA | 1 | 03-07-2014 02:59 PM |