如何将形状粘贴到 VBA 中的 Powerpoint 演示文稿的备注页中?
How do I paste a Shape into the notes page of a Powerpoint presentation in VBA?
我正在尝试使用以下代码将复制的形状粘贴到笔记页中,但粘贴命令失败并出现错误 "The specified data type is unavailable"。如果剪贴板包含文本而不是形状,它会起作用。感谢任何帮助
Dim oSlide As Slide
Dim oShapes As Shapes
Set oSlide = ActivePresentation.Slides.Item(1).NotesPage.Item(1)
Set oShapes = oSlide.Shapes
oShapes.Paste
这是 PPT 2007/2010 中的已知错误,但已在 2013 年修复。
对于 2007/2010 切换到笔记页面视图,移动到所需的笔记页面,然后使用 ActiveWindow.View.Paste
获得相同的效果。
我正在尝试使用以下代码将复制的形状粘贴到笔记页中,但粘贴命令失败并出现错误 "The specified data type is unavailable"。如果剪贴板包含文本而不是形状,它会起作用。感谢任何帮助
Dim oSlide As Slide
Dim oShapes As Shapes
Set oSlide = ActivePresentation.Slides.Item(1).NotesPage.Item(1)
Set oShapes = oSlide.Shapes
oShapes.Paste
这是 PPT 2007/2010 中的已知错误,但已在 2013 年修复。
对于 2007/2010 切换到笔记页面视图,移动到所需的笔记页面,然后使用 ActiveWindow.View.Paste
获得相同的效果。