Double parens in bullets?

  • Thread starter Thread starter hmskarda
  • Start date Start date
H

hmskarda

Can an option for "(1)" be added to the Bullets and Numbering dialog?
Currently there is only an option for "1)".
 
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
 
Back
Top