Please Note: This article is written for users of the following Microsoft Word versions: 97, 2000, 2002, and 2003. If you are using a later version (Word 2007 or later), this tip may not work for you. For a version of this tip written specifically for later versions of Word, click here: Consistent Spacing.
There is an unwritten rule in typesetting that there should only be one space after the end of a sentence. This provides the best visual appearance on a printed page, particularly when using proportional typefaces. The problem is that it is easy to add additional spaces at the end of a sentence without even realizing it. The following macro, CheckSpaces, is a tool you can use to double-check the end of your sentences:
Call MakeChanges("Normal", ".")
Call MakeChanges("Normal", "!")
Call MakeChanges("Normal", ":")
Sub MakeChanges(StyName As String, PuncMark As String)
Selection.Find.Style = ActiveDocument.Styles(StyName)
.Text = PuncMark & " "
.Replacement.Text = PuncMark & " "
.Forward = True
.Wrap = wdFindContinue
.Format = True
Selection.Find.Text = PuncMark & " "
CheckSpaces will only take extra spaces out of paragraphs formatted with the Normal style. This ensures you won't mess up formatting in tables or other design elements where you may want extra spaces after periods. If you want to change the type of punctuation searched for, or search in different style paragraphs, add additional calls to MakeChanges after the fourth line in the macro.
WordTips is your source for cost-effective Microsoft Word training. (Microsoft Word is the most popular word processing software in the world.) This tip (262) applies to Microsoft Word 97, 2000, 2002, and 2003. You can find a version of this tip for the ribbon interface of Word (Word 2007 and later) here: Consistent Spacing.
Comprehensive VBA Guide Visual Basic for Applications (VBA) is the language used for writing macros in all Office programs. This complete guide shows both professionals and novices how to master VBA in order to customize the entire Office suite for their needs. Check out Mastering VBA for Office 2010 today!
Leave your own comment:
Comments for this tip:
GeordieLad 16 Aug 2014, 12:18
Kiloyard. Thanks for your clear advice – and sucks to Gruntlelark who appears to be thoroughly DISgruntled!
Apart from the single or two spaces (and, incidentally, proportional spacing with a single space after a point does NOT improve the readability). Whatever, I find it no trouble at all to achieve my aim with a single Find/Replace per document.
What peeves me more is the absence of line spacing between paragraphs or listed items; hence my hitherto laborious procedure to make easier reading of text which may fill a page without paragraph separators. No paragraph should be longer than, say, a dozen lines; if it is, the reader’s eyes tend to glaze over and the message is lost. In some instances it is not easy to see the end of a paragraph; often I need to highlight selected text and change font size to find the “hard” return (a CR without the LF). It’s the latter which peeves me most when, with a little more consideration, the writer could have got his message over much more clearly.
Gruntledlark 15 Aug 2014, 09:10
Anyone who uses 2 spaces after a period is a stubborn old coot. I'm over 50 and I learned to add 2 spaces in HS typing class - where I learned ON A TYPEWRITER. I doubt that anyone posting here is using a typewriter. Nearly every font in common use these days is proportional so DON'T ADD THE EXTRA SPACE! This is one of my pet peeves. Whenever I get a document that was started by someone else and I'm asked to complete it, my first step is to run a FIND/REPLACE for ". " to ". "
Also, WTH are you adding "CRLFs" to get spacing b/w your paragraphs? That's what style definitions are for.
Create documents with the tools you have today. Don't try to force old rules and tools from old technology into your documents - you just end up pissing off the next person who has to handle it.
Kiloyard 07 Jul 2014, 15:25
GeordieLad, if I understand correctly what you are trying to achieve with a “hard” CRLF, you seem to be using line spacing to achieve paragraph spacing. There is an overly complex find-and-replace solution that would result in the same visual effect, but the simple solution would appear to be to select the necessary paragraphs and (assuming a 12 point font) Format>Paragraph>After=6 pt (Alt+O, P, Alt+F, 6, Enter)
If you don’t want to go through that procedure each time (and why would you?) you can just modify your ‘Normal’ Style by selecting and right-clicking on some of the modified text and selecting Style>Update Normal to Match Selection
PeterJ 07 Jul 2014, 04:12
This is an old chestnut and one that people often argue about. The point is that whatever you choose needs to be consistent. I do have a macro that enforces two spaces. However, the easiest way of being consistent is to let Word itself check this for you. There are two settings that you need to make in Word Options.
First go to Word Options and Proofing. This is where the real work is done – in the 'When correcting spelling and grammar in Word' section.
1. Make sure that 'Mark grammar errors as you type' is ticked.
2. Choose - Grammar & Style
- Writing Style: Click the 'Settings' button
- Word has a setting 'Spaces Required between sentences'
- There are three choices 1, 2, and don't check (the default)
- You need to set this twice once for Grammar & Style and once for Grammar only.
Then the end of every sentence that goes against your chosen standard will be highlighted as a grammatical error by a wavy green underline. Right click on those and correct them.
GeordieLad 06 Jul 2014, 07:30
I agree wholeheartedly with Bruno V; two spaces after the end of a sentence makes the text much easier to read. I habitually use Find and replace to achieve this (and for sentences ending with ? or !).
Another point of preference for me is having a clear line space (or a half space) after every paragraph (by which I mean a "hard" CRLF in the text). Whilst this may use more paper (if printed) it certainly makes for easier reading. Unfortunately there is no Find and replace solution and it necessitates a laborious paragraph by paragraph action with a CRLF at the end of the penultimate text line in the paragraph followed by highlighting the remainder of the paragraph text and selecting Format>Paragraph>Line Spacing 1.5 lines. It may also necessaitate all relevant text being set to the Normal style. If one wants a half line space in this context even that is not achievable if there is a hyperlinked phrase bridging the last two lines; this then necessitates 2 CRLFs after the sentence point. If anyone knows how to solve that one I'd be pleased to see it.
Bruno V 06 Jul 2014, 05:58
Allan, in reality there is no unwritten 'rule'. Instead opinions widely differ and studies about what is most readable (one or two spaces) are even to this day inconclusive.
My own tests, be it non-scientific (but then so are many others) lead me to use double spacing. Except for non-proportional typefaces such as used in this reply box and where double spacing actually interrupts the fluidity of reading. I could go deeper into the topic but this is not the place to do so.
Anyway, different people may have different preferences. The important thing is to be consistent within the same document or series of documents.
How could your tip be used for enforcing/checking double spacing?
ShaulBel 06 Jul 2014, 03:41
If there are more than one extra space after the pank the macro should be changed because it replaces only the first extra space.
Gillian 05 Jul 2014, 10:49
How do you get to the macro tool "CheckSpaces" to make adjustments to the line spacing.
I cannot do what is required with know how to get to the CheckSpaces" link.