select first sentence of paragraph

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

bbarger - 01 Jan 2005 03:55 GMT

I am trying to loop through the paragraphs of a document and
select in turn the first sentence of each paragraph, and
apply formatting.

The line below selects the whole paragraph:

Selection.MoveDown Unit:=wdParagraph, Extend:=wdSentence

Can anyone tell me how to select just the first sentence?
Or provide a link that demonstrates this?

Thanks,

Bob Barger

Reply to this Message

Greg Maxey - 01 Jan 2005 04:12 GMT

Bob,

Maybe something like:

Sub ScratchMacro()
Dim oPar As Paragraph
For Each oPar In ActiveDocument.Paragraphs
oPar.Range.Sentences(1).Bold = True
Next
End Sub

Signature

Greg Maxey/Word MVP
A Peer in Peer to Peer Support

> I am trying to loop through the paragraphs of a document and
> select in turn the first sentence of each paragraph, and
[quoted text clipped - 10 lines]
>
> Bob Barger

Reply to this Message

bbarger - 01 Jan 2005 04:23 GMT

Greg,

Thank you very much! This is just what I was looking for.

Bob

-->Bob,
-->
-->Maybe something like:
-->
-->Sub ScratchMacro()
-->Dim oPar As Paragraph
-->For Each oPar In ActiveDocument.Paragraphs
--> oPar.Range.Sentences(1).Bold = True
-->Next
-->End Sub

Reply to this Message