Macro - add 2 spaces after the end of a sentence.

Sep 20, 2016
Reaction score
I know there will be debates out there about whether 1 space or 2 spaces is "correct". I am a 1 space person, my office would like 2 spaces.

In an effort to avoid any officespace-esque repetitious "did you get the memo about using 2 spaces" I would like to create a Macro to automate adding 2 spaces after a period. However, I am new to Macros and Brand new to using Macros in Outlook. But I can't imagine this would be impossible.

I have been playing with:

Sub Spacing()
With objMsg
.Text = "([A-Za-z].)([A-Za-z])"
.MatchWildcards = True
.Wrap = wdFindContinue
.Replacement.Text = "\1 \2"
.Execute Replace:=wdReplaceAll
End With
End Sub

however, I continually get a 424.

Anyone have any better Ideas?

Thank you in advance!


Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question