adding x lines of text, then adding new slide, etc

[Silvester]

On a command button click event I use PP automation from Access 2000 to
generate a new slideshow with text from a A2000 form textbox (enter = new
line in field)

Dim ppSlide1 As PowerPoint.Slide
Set ppSlide1 = ppPres.Slides.Add(1, ppLayoutText)

Right now at font size 24, nine lines of text fit in the standard PP slide
textbox under the title.

How can I get powerpoint to add keep adding a new slide for every nine lines
of text so that the slideshow builds itself to fit the text.

Thanks for any help.

 

[Bill Dilworth]

While this sounds really complex, it really isn't.

Simply create the entire slideshow from Access. Then loop through the
slides looking for textframes that contain more than 9 lines. Then it's
just a matter of inserting a duplicate slide with the overflow text lines.

Post back if you run into trouble with your code.

--
Bill Dilworth, Microsoft PPT MVP
===============
Please spend a few minutes checking vestprog2@
out www.pptfaq.com This link will yahoo.
answer most of our questions, before com
you think to ask them.

Change org to com to defuse anti-spam,
ant-virus, anti-nuisance misdirection.
..
..