PPT 2007 Bug?

In 2003 I could do the following:

shape.textframe.textrange.paragraphs(i).insertafte r.paste

Now I get a runtime error:
The specified parameter has an invalid value.

Even running the following snippet from the help files produces the same
error.

Application.ActivePresentation.Slides(1).Shapes(1) .TextFrame _
.TextRange.InsertAfter.Paste

Yet, if I replace the paste with some text string, then all is well.
However, it is important that I be able to paste because I need to maintain
the formating from the section that I moving to this section of the slide.

Thanks,

Burnsie

Yes, this is a bug with the InsertAfter in PPT 2007 reported by, Word MVP,
Jonathan West. Use the following code instead to get the same effect.

Application.ActivePresentation.Slides(1).Shapes(1) .TextFrame _
.TextRange.InsertAfter(" ").Paste

Regards,
Shyam Pillai

Image Importer Wizard
http://skp.mvps.org/iiw.htm

"Burnsie" wrote in message
...
In 2003 I could do the following:

shape.textframe.textrange.paragraphs(i).insertafte r.paste

Now I get a runtime error:
The specified parameter has an invalid value.

Even running the following snippet from the help files produces the same
error.

Application.ActivePresentation.Slides(1).Shapes(1) .TextFrame _
.TextRange.InsertAfter.Paste

Yet, if I replace the paste with some text string, then all is well.
However, it is important that I be able to paste because I need to
maintain
the formating from the section that I moving to this section of the slide.

Thanks,

Burnsie

Shyam,

Thanks a lot. This is exactly what we need.

Burnsie

"Shyam Pillai" wrote:

Yes, this is a bug with the InsertAfter in PPT 2007 reported by, Word MVP,
Jonathan West. Use the following code instead to get the same effect.

Application.ActivePresentation.Slides(1).Shapes(1) .TextFrame _
.TextRange.InsertAfter(" ").Paste

Regards,
Shyam Pillai

Image Importer Wizard
http://skp.mvps.org/iiw.htm

"Burnsie" wrote in message
...
In 2003 I could do the following:

shape.textframe.textrange.paragraphs(i).insertafte r.paste

Now I get a runtime error:
The specified parameter has an invalid value.

Even running the following snippet from the help files produces the same
error.

Application.ActivePresentation.Slides(1).Shapes(1) .TextFrame _
.TextRange.InsertAfter.Paste

Yet, if I replace the paste with some text string, then all is well.
However, it is important that I be able to paste because I need to
maintain
the formating from the section that I moving to this section of the slide.

Thanks,

Burnsie