S
Savan Gandhi
Hi,
I am facing problem with this code:
Copying speaker notes from source slide in source PPT to destination slide
in destination PPT.
Error : Shapes (unknown member) : Invalid request. The specified data type
is unavailable.
sldCurrSlide = ppPres.Slides.Add(ppPres.Slides.Count + 1, ppLayoutBlank)
sldCurrSlide.NotesPage.Design = sldSource.NotesPage.Design
For Each sh As PowerPoint.Shape In sldSource.NotesPage.Shapes
sh.Copy()
sldCurrSlide.NotesPage.Shapes.Paste() // error comes at this line
Next
'Add the exported image into the slide as Locked slide
sldCurrSlide.Shapes.AddPicture(strImagePath, LinkToFile:=msoFalse,
SaveWithDocument:=msoTrue, _
Left:=0, Top:=0, Width:=ppPres.PageSetup.SlideWidth,
Height:=ppPres.PageSetup.SlideHeight)
Any suggestions?
Thanks,
Savan
I am facing problem with this code:
Copying speaker notes from source slide in source PPT to destination slide
in destination PPT.
Error : Shapes (unknown member) : Invalid request. The specified data type
is unavailable.
sldCurrSlide = ppPres.Slides.Add(ppPres.Slides.Count + 1, ppLayoutBlank)
sldCurrSlide.NotesPage.Design = sldSource.NotesPage.Design
For Each sh As PowerPoint.Shape In sldSource.NotesPage.Shapes
sh.Copy()
sldCurrSlide.NotesPage.Shapes.Paste() // error comes at this line
Next
'Add the exported image into the slide as Locked slide
sldCurrSlide.Shapes.AddPicture(strImagePath, LinkToFile:=msoFalse,
SaveWithDocument:=msoTrue, _
Left:=0, Top:=0, Width:=ppPres.PageSetup.SlideWidth,
Height:=ppPres.PageSetup.SlideHeight)
Any suggestions?
Thanks,
Savan