I write for UK magazines so I often have to use pounds symbols and my mum’s and brother’s surnames have an ‘e’ with an accute accent – unfortunately neither is on my keyboard. So, to make things easier to write, I use a macro to convert a word to a typed character.

Here’s a sample you can use and adapt. It converts the words cents, pounds, degrees and division to their character equivalents and you can use it to replace almost any word or character with another single character, word or phrase of your choosing:

Sub ConvertText()
FindAndReplace “cents”, “¢”
FindAndReplace “pounds”, “£”
FindAndReplace “degrees”, “º”
FindAndReplace “division”, “÷”
End Sub

Sub FindAndReplace(FindThisWord, ReplaceWithWord)
Set EditRange = ActiveDocument.Content
EditRange.Find.ClearFormatting
EditRange.Find.Execute FindText:=FindThisWord, ReplaceWith:=ReplaceWithWord, MatchCase:=0, Replace:=wdReplaceAll
End Sub

For more tips and tricks and helpful Office columns, visit Projectwoman.com

Helen Bradley

Related posts:

  1. Add Mac Keyboard Icons to Word documents (and other things)
  2. Autonumber a series of Word documents
  3. Autonumbering documents in Word
  4. Word 2007: Drawing in documents
  5. Word 2010 and 2013 Tip – Save documents for use with older Word versions