Make Autocorrect Case-Specific?

rjb · #1 11-19-2018, 09:09 AM

I have a word that sometimes has to be all lower-case, and sometimes has to be all upper-case. It will NEVER be Title Case. (In other words, sometimes it must appear example, sometimes EXAMPLE, never Example.)

It frequently appears at the start of sentences/paragraphs, so if I type it all lower case, the "Capitalize first letter of sentences" rules (e.g., I start a sentence by typing "example", Autocorrect turns it into Example.)

So I created an Autocorrect entry that corrects "Example" to example. Works like a charm. Unless I need it to be All-Caps. Now, when I type EXAMPLE it Autocorrects to example. I can back-space/Undo, but that is irritating.

When I try to add "EXAMPLE" to Autocorrect's "Replace" box, it actually auto-corrects in the field form to "Example"!

Is there a way - outside of Macros (which are forbidden on some work computers) - to set an entry that is case-specific? So "Example" becomes example and "EXAMPLE" stays EXAMPLE?

Thanks!

Charles Kenyon · #2 11-19-2018, 12:38 PM

The only thing I can recommend is to turn off the Capitalize first word of a sentence.

For things that you need in all caps, you could use a character style that is ALL CAPS.

rjb · #3 11-19-2018, 12:44 PM

Thanks. Some follow-up questions.

Quote:

Originally Posted by Charles Kenyon

The only thing I can recommend is to turn off the Capitalize first word of a sentence.

Yeah, that's what I thought. But I need that functionality a TON.

Quote:

Originally Posted by Charles Kenyon

For things that you need in all caps, you could use a character style that is ALL CAPS.

But Styles pertain to an entire paragraph - not just the one word, right?

Charles Kenyon · #4 11-19-2018, 12:47 PM

Character style vs. paragraph style.

gmayor · #5 11-19-2018, 09:11 PM

You could create a pair of macros and associate them with keyboard shortcuts to apply upper orlower case to any word the cursor is in e.g.

Code:

Sub Macro1()
Dim orng As Range
    Set orng = Selection.Words(1)
    orng.Text = UCase(orng.Text)
lbl_Exit:
    Set orng = Nothing
    Exit Sub
End Sub

Sub Macro2()
Dim orng As Range
    Set orng = Selection.Words(1)
    orng.Text = LCase(orng.Text)
lbl_Exit:
    Set orng = Nothing
    Exit Sub
End Sub

Another possibility is to use PhraseExpress This is like an upscaled version of autocorrect and will allow you to create separate autocorrect entries for example and EXAMPLE on the same shortcut.

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
VBA Word - Find & Apply Styles to Specific Words - Using Case Statement	jc491	Word VBA	17	12-26-2015 12:25 PM
How to make word ignore a specific shape when printing?	ZAK	Word	12	04-07-2014 03:14 PM
How to make a SPECIFIC FONT shortcut button?	E922	Word	4	03-18-2014 03:11 PM
Autocorrect to make words Bold?	GB89	Word	1	04-15-2010 09:04 PM
From all UPPER CASE to Proper Case	davers	Word	1	04-30-2009 12:41 PM