Hi
PPT 2003:
I try to format a TextFrame with bullets by VBA.
How can I format the frame that there is a space
between the bullet and the text.
Manually I can just drag the marker in the scale.
When I record this action with the macro-editor,
there is no code in the macro afterwords.
In Word-VBA the code is something like
Selection.LeftIndent = x
or Selection.FirstLineIndent = -x
Thanks for any help.
Best Regards, George
vindys - 17 Mar 2008 09:34 GMT
Try this ruler.levels
ActivePresentation.Slides(1).Shapes(1).TextFrame.Ruler.Levels(1).LeftMargin
= 400
> Hi
>
[quoted text clipped - 14 lines]
>
> Best Regards, George
John Wilson - 17 Mar 2008 09:40 GMT
Try something like this
With ActiveWindow.Selection.ShapeRange.TextFrame.Ruler.Levels(1)
.LeftMargin = xx
.FirstMargin = yy
End With
Note that it will error if no shape selected or selected item has no
textframe so some error checking would be good. You can set up to 5 levels in
a placeholder

Signature
Amazing PPT Hints, Tips and Tutorials
http://www.PPTAlchemy.co.uk
http://www.technologytrish.co.uk
email john AT technologytrish.co.uk
> Hi
>
[quoted text clipped - 14 lines]
>
> Best Regards, George
George - 17 Mar 2008 10:56 GMT
Dear Vindys and dear John
Thanks a lot for your help; my
problem is solved!
Best Regards, George
> Hi
>
[quoted text clipped - 13 lines]
>
> Best Regards, George