If this is your first visit, be sure to check out the FAQ by clicking the link above. You may have to register before you can post: click the register link above to proceed. To start viewing messages, select the forum that you want to visit from the selection below. |
|
|
Thread Tools | Display Modes |
#1
|
|||
|
|||
Word 2003: Applying a character style to the first sentence of every paragraph.
I've searched the newsgroup and was unable to locate an answer to my
question, so here it goes... Our users are looking for a way to apply the character style called First Sentence, (which includes bold and underline), globally throughout long documents without having to manually apply it. I've under the Find and Replace option in Word 2003 but can't find how to do this. Is it even possible? Thank you in advance for your assistance! __________________________________________________ _________ Vickie S. Evans, Technical Trainer | Locke Liddell & Sapp LLP | 2200 Ross Avenue, Suite 2200, Dallas, TX 75201 | Direct: 214.740.8271 | www.lockeliddell.com |
#2
|
|||
|
|||
Word 2003: Applying a character style to the first sentence of every paragraph.
Vickie do you mean "globally" as in apply it to every bit of the text
in the document? If so, just select all (CTRL+a) and apply the style. Do you mean apply the "First Sentence" style globally to the first sentence every paragraph? Then perhaps something along these lines will do: Sub Scratchmacro2() Dim oPar As Paragraph Dim oRng As Word.Range For Each oPar In ActiveDocument.Range.Paragraphs oPar.Range.Sentences(1).Select With Selection .MoveEndUntil Cset:="n", Count:=wdBackward .Style = "First Sentence" End With Next oPar End Sub |
#3
|
|||
|
|||
Word 2003: Applying a character style to the first sentence of every paragraph.
Greg,
Thanks for your response. I'm interested in the second option... apply the "First Sentence" style globally to the first sentence every paragraph. I'll test the code and let you know how it turns out. Thanks again! Vickie I just want the first sentence of every paragraph to be styled with the First Sentence style without having to manually apply it to each and every one "Greg" wrote in message oups.com... Vickie do you mean "globally" as in apply it to every bit of the text in the document? If so, just select all (CTRL+a) and apply the style. Do you mean apply the "First Sentence" style globally to the first sentence every paragraph? Then perhaps something along these lines will do: Sub Scratchmacro2() Dim oPar As Paragraph Dim oRng As Word.Range For Each oPar In ActiveDocument.Range.Paragraphs oPar.Range.Sentences(1).Select With Selection .MoveEndUntil Cset:="n", Count:=wdBackward .Style = "First Sentence" End With Next oPar End Sub |
#4
|
|||
|
|||
Word 2003: Applying a character style to the first sentenceof every paragraph.
While you're at it, have a chat to your document designer about that
underline :-) Readability research proves conclusively that underlining text makes it difficult to read, and causes the reader's retentivity to drop sharply. See http://scholar.google.com/url?sa=U&q...oceed/2000/PDF s/00006.PDF Readers of English read by recognising the "shape" of entire phrases. If you underline text, you change the shape, causing the reader to have to slow down and read word-by-word (or often, character-by-character). Your retentivity will fall by around 70 per cent. Great if you sell the course, you get the chance for all that repeat business to teach the students what they should have remembered the first time. But not so good if you are the customer paying for them :-) Hope this helps On 30/3/06 6:52 AM, in article , "Vickie S. Evans" wrote: Greg, Thanks for your response. I'm interested in the second option... apply the "First Sentence" style globally to the first sentence every paragraph. I'll test the code and let you know how it turns out. Thanks again! Vickie I just want the first sentence of every paragraph to be styled with the First Sentence style without having to manually apply it to each and every one "Greg" wrote in message oups.com... Vickie do you mean "globally" as in apply it to every bit of the text in the document? If so, just select all (CTRL+a) and apply the style. Do you mean apply the "First Sentence" style globally to the first sentence every paragraph? Then perhaps something along these lines will do: Sub Scratchmacro2() Dim oPar As Paragraph Dim oRng As Word.Range For Each oPar In ActiveDocument.Range.Paragraphs oPar.Range.Sentences(1).Select With Selection .MoveEndUntil Cset:="n", Count:=wdBackward .Style = "First Sentence" End With Next oPar End Sub -- Please reply to the newsgroup to maintain the thread. Please do not email me unless I ask you to. John McGhie Microsoft MVP, Word and Word for Macintosh. Consultant Technical Writer Sydney, Australia +61 (0) 4 1209 1410 |
Thread Tools | |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Thread Starter | Forum | Replies | Last Post |
take yet another lesson from wordperfect "reveal codes" | wordperfect is superior | General Discussion | 5 | May 11th, 2009 07:58 PM |
How to put graphics on envelopes? | Steve Koenig | General Discussion | 20 | September 14th, 2007 04:40 PM |
Converting WordPerfect 12 files to Word 2003 | Curious | New Users | 3 | March 29th, 2006 01:05 AM |
How to change merge forms from Word Perfect to Microsoft Word | Charles Kenyon | General Discussion | 1 | December 30th, 2004 04:35 PM |
Changing Attributes of "No Style" Option | Michele | Formatting Long Documents | 14 | May 22nd, 2004 11:41 PM |