Macro to place cursor at beginning of sentence (Word 2003)

[Alan Stancliff]

This question is about VBA in Word 2003

How do I get a macro to place the cursor at the start of the sentence it
is currently located in without selecting the sentence? I have tried
various experiments with wildcard searches backwards and
Selection.Extend, but I don't want to end up with the sentence selected.
Backwards search assumes that there is some previous end-of-sentence
punctuation mark, which is not necessarily true, especially in outlines.

Any suggestions?

Regards,

Alan Stancliff

 

[Greg Maxey]

Sub Scratchmacro()
Dim oSent As Range
Set oSent = Selection.Sentences(1)
oSent.Collapse wdCollapseStart
oSent.Select
End Sub


--
~~~~~~~~~~~~~~~~~~~~~~~~~~~
Greg Maxey - Word MVP

My web site http://gregmaxey.mvps.org
Word MVP web site http://word.mvps.org~~~~~~~~~~~~~~~~~~~~~~~~~~

 

[Alan Stancliff]

Thanks for the sub, Greg.

I went to your site and thought it was very informative.

Regards,

Alan

 

[Greg Maxey]

Glad to help.

--
~~~~~~~~~~~~~~~~~~~~~~~~~~~
Greg Maxey - Word MVP

My web site http://gregmaxey.mvps.org
Word MVP web site http://word.mvps.org~~~~~~~~~~~~~~~~~~~~~~~~~~