replacing the full name of elements by their respective symbol, in a long MS Word text.

		Microsoft Office Forums > Microsoft Word > Word VBA
replacing the full name of elements by their respective symbol, in a long MS Word text.

FAQ

Thread Tools

Display Modes

07-27-2018, 04:50 PM

BobT

Windows 10 replacing the full name of elements by their respective symbol, in a long MS Word text.

Office 2016

Novice

Join Date: Jul 2018

Posts: 8

replacing the full name of elements by their respective symbol, in a long MS Word text.

Could you help me with a macro to replace the full name of elements by their respective symbol, in a long MS Word text. For example:
"Actinium" replaced by "Ac"
"Aluminum" replaced by "Al"
"Americium" replaced by "Am"
"Antimony" replaced by "Sb"
"Argon" replaced by "Ar"
"Arsenic" replaced by "As"
"Astatine" replaced by "At"
"Barium" replaced by "Ba"

Note: There is no " " in the text, before and after.

Thank you

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
How to always open microsoft word with full text justification	ArchanRC	Word	2	06-01-2018 03:51 PM
turn footnotes and their respective superscripts into normal text	GEORGEJUNGCOCAINE	Word VBA	2	02-27-2018 10:01 PM
turn footnotes and their respective superscripts into normal unlinkable text	GEORGEJUNGCOCAINE	Word	1	02-27-2018 05:47 PM
How to adapt a text pasted from PDF to the full width of a microsoft word page	Alessio	Word	2	01-13-2018 03:35 PM
Finding and Replacing a word with text copied to clip board	spc94	Word VBA	3	06-25-2015 04:46 AM