Alternating Bold Paragraphs

[Samo]

I'm using Microsoft Word 98 and trying to basically have every other
paragraph be in bold. Each paragraph is separated by a blank line. Is there
a way of writing a conditional script in which each time a blank line is
recognized, the bold format is toggled?

Thanks!

 

[macropod]

Hi Samo,

AFAIK, you can't do this while typing in the document. However, you could run a suitable macro to do the alternate paragraph bolding
for you. Here's some code to play with:

Sub ParagraphFormatter()
Dim oRng As Range
Dim i As Long
With ActiveDocument
For i = 1 To .Paragraphs.Count
If i Mod 2 = 0 Then
.Paragraphs(i).Range.Bold = True
Else
.Paragraphs(i).Range.Bold = False
End If
Next i
End With
End Sub

 

[Tony Jollans]

You could do it while typing if you used two styles - differing only in
their boldness - each set with the other as the next style - and each with
space after so you didn't need to type the blank line. It wouldn't work if
you wanted to insert paragraphs in the middle, though.

--
Enjoy,
Tony

www.WordArticles.com

Hi Samo,

AFAIK, you can't do this while typing in the document. However, you could
run a suitable macro to do the alternate paragraph bolding for you. Here's
some code to play with:

Sub ParagraphFormatter()
Dim oRng As Range
Dim i As Long
With ActiveDocument
For i = 1 To .Paragraphs.Count
If i Mod 2 = 0 Then
.Paragraphs(i).Range.Bold = True
Else
.Paragraphs(i).Range.Bold = False
End If
Next i
End With
End Sub

--
Cheers
macropod
[MVP - Microsoft Word]

I'm using Microsoft Word 98 and trying to basically have every other
paragraph be in bold. Each paragraph is separated by a blank line. Is
there
a way of writing a conditional script in which each time a blank line is
recognized, the bold format is toggled?

Thanks!

 

[Helmut Weber]

Hi Samo

I'm using Microsoft Word 98 and trying to basically have every other
paragraph be in bold. Each paragraph is separated by a blank line. Is there
a way of writing a conditional script in which each time a blank line is
recognized, the bold format is toggled?

what is a blank line for you?
An empty paragraph?

If so, your document layout needs improvement
(avoid empty paragraphs) and therefore what
both macropod and Tony have suggested wouldn't work,
though it would work in a document layouted properly.

--

Greetings from Bavaria, Germany

Helmut Weber, MVP WordVBA

Vista Small Business, Office XP

 

[macropod]

Hi Tony,

Yes, two Styles could work - each defined to have the other as the 'following' paragraph Style.

--
Cheers
macropod
[MVP - Microsoft Word]

You could do it while typing if you used two styles - differing only in
their boldness - each set with the other as the next style - and each with
space after so you didn't need to type the blank line. It wouldn't work if
you wanted to insert paragraphs in the middle, though.

--
Enjoy,
Tony

www.WordArticles.com

Hi Samo,

AFAIK, you can't do this while typing in the document. However, you could
run a suitable macro to do the alternate paragraph bolding for you. Here's
some code to play with:

Sub ParagraphFormatter()
Dim oRng As Range
Dim i As Long
With ActiveDocument
For i = 1 To .Paragraphs.Count
If i Mod 2 = 0 Then
.Paragraphs(i).Range.Bold = True
Else
.Paragraphs(i).Range.Bold = False
End If
Next i
End With
End Sub

--
Cheers
macropod
[MVP - Microsoft Word]

I'm using Microsoft Word 98 and trying to basically have every other
paragraph be in bold. Each paragraph is separated by a blank line. Is
there
a way of writing a conditional script in which each time a blank line is
recognized, the bold format is toggled?

Thanks!