Chart Layout

[sylvainpellletier]

Hello evrybody,

I run a macro to add the chart layout to some of the slides of a
PowerPoint presentation.
I like to have that zone that just ask you to double clik to add a
chart.
My problem is that I would like to get rid of the title zone. I do not
use it.

Here's my code :

For i = 6 To ActiveWindow.Presentation.Slides.Count

ActiveWindow.View.GotoSlide Index:=i
ActiveWindow.Selection.SlideRange.Layout = ppLayoutChart
ActiveWindow.Selection.SlideRange.Shapes("Rectangle 29").Select
ActiveWindow.Selection.ShapeRange.Delete

Next i

It works fine for the first slide, but not for the others because the
number of the "rectangle" is not different.
The problem is also that the chart shape is a rectangle so I can not
delete every rectangle.

Any idea of where to look ?

Thanks in advance.

 

[sylvainpellletier]

Thanks Steve ! It works just fine.
I have just deleted that part : oSl.Layout = ppLayoutChart
It wasn't useful in my case.

Thanks again !