How to shorten English words of specific length by macro?

Emby · #1 10-16-2022, 01:20 AM

I have a word file containing English and Chinese words. When an English word exceeds four characters, it is necessary to shorten the line of English words to three characters. The rules are as follows:
Before After Rule
a 日 a 日 No change
aa 昌 aa 昌 No change
aaa 晶 aaa 晶 No change
aaam 㬪 aam 㬪 Delete the third character of the English word

aahaf 鷼 aaf 鷼 Delete the third and fourth characters of the English word

macropod · #2 10-16-2022, 05:39 AM

You do not need a macro for this. All you need is a wildcard Find/Replace, where:
Find = <([A-Za-z]{2})[A-Za-z]@([A-Za-z])>
Replace = \1\2

Emby · #3 10-16-2022, 08:43 AM

Quote:

Originally Posted by macropod

You do not need a macro for this. All you need is a wildcard Find/Replace, where:
Find = <([A-Za-z]{2})[A-Za-z]@([A-Za-z])>
Replace = \1\2

Thanks macropod for the reply. Am I missing any steps? There are always no search results so that I cannot convert the attached file 1 (Before.docx) to attached file 2 (After.docx). Would you mind helping me?

macropod · #4 10-16-2022, 02:27 PM

Did you check the 'Use wildcards' option?

Emby · #5 10-16-2022, 11:25 PM

I got it. Thanks again.

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Macro in Word to find specific words? Will be used for good cause (prostate cancer research)	cancerresearcher	Word VBA	15	07-23-2019 01:53 PM
Macro to search for specific words in a document	mike0215	Word VBA	2	11-28-2017 07:25 AM
Finding Non-English Words in an English and Non-English words document	mohsen.amiri	Word	3	03-31-2015 11:20 PM
Need VBA For Macro On How To Remove Specific Words	netchie	Word VBA	6	08-28-2012 03:37 PM
Macro for highlighting specific number of words	icsjohn	Word VBA	2	12-07-2011 06:44 PM