Double parens in bullets?

H

hmskarda

Can an option for "(1)" be added to the Bullets and Numbering dialog?
Currently there is only an option for "1)".
 
J

John Wilson

AFAIK you cannot do this in the GUI

You can with code

Sub specialbullet()
With ActiveWindow.Selection.TextRange
For i = 1 To .Lines.Count
With .Lines(i).ParagraphFormat
..Bullet.Type = ppBulletNumbered
..Bullet.Style = ppBulletArabicParenBoth
End With
Next
End With
End Sub

How to use code:
http://www.pptalchemy.co.uk/powerpoint_hints_and_tips_tutorials.html#vba
--

john ATSIGN PPTAlchemy.co.uk
Custom vba coding and PPT Makeovers
Free PPT Hints, Tips and Tutorials
http://www.pptalchemy.co.uk/powerpoint_hints_and_tips_tutorials.html
 
Top