Hi

I have some VBA code for power point that creates a custom drawing (a
chart) during a slideshow presentation. The chart is created using
lines, shapes and textboxes.

First I create a new slide (I'm producing multiple charts) -
Set newSlide =
ActivePresentation.Slides.Add(ActivePresentation.Slides.Count + 1,
ppLayoutBlank)

Then I start building the chart....

For example, I create a new line (for the axis) with the code -
Set newShape = newSlide.Shapes.AddLine(startLeft, startTop, endLeft,
endTop)

For my blocks, I use custom/freeform shapes, for example -
newSlide.Shapes.BuildFreeform(msoEditingAuto, startLeft, startTop)

Then, and here's the problem, I need to create a set of TextBoxes.
During 'Design Time' I use code like -
newSlide.Shapes.AddTextbox(msoTextOrientationHorizontal, 0, 0, 10,
10).Select
With ActiveWindow.Selection
        .... code to modify text box

Since I cannot use SELECT during run time (i.e. in the presentation),
what is the alternative?

Thank you