word macro help

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

Kirk - 14 Jan 2005 17:32 GMT

I am trying to write a macro that will add a drop cap to every
paragraph in a document where a certain text string is found. Is there
a way this can be accomplished? I am having problems since the drop cap
macro created keys on paragraph while the search macro keys on the
selected find.

Thanks for any help you can give.

Reply to this Message

Jezebel - 14 Jan 2005 21:46 GMT

Dim pPar As Word.Paragraph

For Each pPar In ActiveDocument.Paragraphs
With pPar
If InStr(.Range, "text to look for") > 0 Then
.DropCap.Position = wdDropNormal
End If
End With
Next

> I am trying to write a macro that will add a drop cap to every
> paragraph in a document where a certain text string is found. Is there
[quoted text clipped - 3 lines]
>
> Thanks for any help you can give.

Reply to this Message

Kirk - 14 Jan 2005 22:39 GMT

Thanks a bunch, this is exactly what I was looking for.

Reply to this Message

Rate this thread: