Automatic Sentence Capitalization

[Dustin D. Cook]

How do I use a macro to capitalize the first letter of every sentence?

We are a real estate firm that has to condense our listing write-ups to fit
in various online comment fields. I wrote a macro to abbreviate many words,
remove others, and generally condense the write-up to within about 60% of its
original size while still conveying all of its original information.

However, once my macro has run many of my sentences no longer begin with
capital letters. This is because many of the words that would normally begin
a sentence (e.g. "the", "a", and "this") have been removed to conserve space.

How should I proceed? I will send macro code upon request via e-mail. It is
against our company policy to post it in a public forum.

 

[Jezebel]

ActiveDocument.Content.Case = wdTitleSentence

 

[Dustin D. Cook]

ActiveDocument.Content.Case = wdTitleSentence

Thank you very much. This is very helpful to me. I do have one additional
question, though. How do I apply this to a selection instead of to the entire
document?

I tried Selection.Case = wdTitleSentence, but the compiler errors with
"Method or data member not found."

Any further assistance you could provide will be greatly appreciated.

 

[Jezebel]

Selection.Range.Case = ...

Thank you very much. This is very helpful to me. I do have one additional
question, though. How do I apply this to a selection instead of to the
entire
document?

I tried Selection.Case = wdTitleSentence, but the compiler errors with
"Method or data member not found."

Any further assistance you could provide will be greatly appreciated.

 

[Dustin D. Cook]

Thank you again for all of your help.