Bulletted List Creation

		Microsoft Office Forums > Microsoft Word > Word VBA
Bulletted List Creation

#22

11-12-2013, 03:23 PM

macropod

Windows 7 32bit Bulletted List Creation

Office 2010 32bit

Administrator

Join Date: Dec 2010

Location: Canberra, Australia

Posts: 22,467

1. After:
.Paragraphs.First.Style = "Normal"
insert:
.Paragraphs.First.Range.Style = "Strong"

2. Before 'With wdDoc.Range', add:

Code:

With wdDoc.Styles("Normal").ParagraphFormat
  .SpaceBefore = 0
  .SpaceAfter = 0
End With

3. After '.Style = "BulletB"', insert:

Code:

With .Paragraphs.First.Range.Words.First
  .Style = "Emphasis"
  .Next.Words.First.Style = "Emphasis"
End With

__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Calendar Creation	sjvjoe	Publisher	1	07-14-2016 06:32 PM
Document Creation	Privateer	Word	3	06-20-2013 08:15 PM
Help with Complex Table Creation	saquib	Word	0	02-12-2013 06:28 AM
Label Creation	speloquin	Word	1	05-27-2011 03:08 PM
Report creation.	Igtech	Excel	1	04-02-2010 03:33 PM

Other Forums: Access Forums

All times are GMT -7. The time now is 08:47 PM.