PPT 2003, copy slides with VB

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

rod - 29 Jul 2004 14:01 GMT

I am using vb to copy slides from one presentation to another and have
noticed that the slides copy exactly but the slide notes lose their
formatting (bulleted lists, indents, etc)

Any ideas on how to get around this?

here is some basic sample code i am using

thanks in advance..

Set objPPT = CreateObject("PowerPoint.Application")
Set objDestination = objPPT.Presentations.Add(0)

Set objSource = objPPT.Presentations.Open(strFileName, -1, -1, 0)
Set oSlide = objSource.Slides.Item(1)
oSlide.Copy
objDestination.Slides.Paste

Reply to this Message

Shyam Pillai - 29 Jul 2004 14:31 GMT

Rod,
When you copy/paste slides, the slides will take on the formatting of the
target presentation and not the source. You will need to write some more
code to read the formatting from the source and apply to the target.

Signature

Regards
Shyam Pillai

Handout Wizard: http://www.mvps.org/skp/how/

>I am using vb to copy slides from one presentation to another and have
> noticed that the slides copy exactly but the slide notes lose their
[quoted text clipped - 13 lines]
> oSlide.Copy
> objDestination.Slides.Paste

Reply to this Message

Cabe?a - 29 Jul 2004 17:20 GMT

Pillai,

You has an example of archive to power point with programinha done in vb.net
or some good material that you recommend I to study?

I am needing to make a system similar to that the friend in the previous
message wrote. I am trying to open slides and to leave they stops
vizualizar inside with small size of the program, but still I did not
obtain.

It can help me?
Cabe?a

Reply to this Message

rod - 30 Jul 2004 02:57 GMT

Shyam,
Thanks for the info, your site is a trememdous help in learning to
automate powerpoint.

I am actually trying to copy the slides to an brand new presentation,
so I am not sure there is any formatting on the target to start with.?
Plus, the slides are formatting fine, but I am losing the bullet
points in the notespage.

I am only having this problem after installing PPT 2003, the same code
worked fine, keeping all formatting, including notes on earlier
version of powerpoint.

rod

> Rod,
> When you copy/paste slides, the slides will take on the formatting of the
[quoted text clipped - 17 lines]
> > oSlide.Copy
> > objDestination.Slides.Paste

Reply to this Message