Remove Indent using VBA

PowerPoint 2003

I am using Excel VBA to copy some XL cells to create a PowerPoint chart via
copy /paste form the clipboard. Unfortunately I have no control over the XL
cells and some of them have 2 lines of data in a single cell ..
unfortunately PowerPoint indents the 2nd row which I do not want.

I have tried playing with macro recorder (no help at all) and various
..shapes(1).TextFrame.Textrange properties to no avail.

Could anybody help with the VBA to remove this indent (or set the indent
value to zero)

Many thans
J

I'm not sure if this is exactly what you're asking, but you can use the
following code to remove the bullet point:

ActiveWindow.Selection.ShapeRange.TextFrame.TextRa nge.Paragraphs(Start:=2,
length:=0).ParagraphFormat.Bullet.Visible = 0

In the above example, replace the 2 with the number of the line you
would like to change. This next code will change the indent level of
the selected line(s):

ActiveWindow.Selection.TextRange.IndentLevel = 1

I hope that helps!


John wrote:
PowerPoint 2003

I am using Excel VBA to copy some XL cells to create a PowerPoint chart via
copy /paste form the clipboard. Unfortunately I have no control over the XL
cells and some of them have 2 lines of data in a single cell ..
unfortunately PowerPoint indents the 2nd row which I do not want.

I have tried playing with macro recorder (no help at all) and various
.shapes(1).TextFrame.Textrange properties to no avail.

Could anybody help with the VBA to remove this indent (or set the indent
value to zero)

Many thans
J