这个让我非常困惑。我编写了一个在excel中创建数据透视表的代码。然后它创建一个新的PowerPoint并调整格式。最后，我希望从excel获取数据透视表，复制它，并将其粘贴到PowerPoint文件中。我希望能够编辑它，以便位图，图片，GIF等不起作用。
在将数据透视表粘贴到excel之前，一切正常。这将图片粘贴到PowerPoint中，没问题：
pt.TableRange1.Copy
newPPT.ActivePresentation.Slides(1).Shapes.PasteSpecial (ppPasteMetafilePicture)
其中pt是数据透视表，newPPT是PowerPoint.Application
然而，这不起作用。
pt.TableRange1.Copy
newPPT.ActivePresentation.Slides(1).Shapes.PasteSpecial (ppPasteHTML)
什么都没有粘贴。我已经尝试过缩小，移动所有物体，因为它可能粘贴在所有物体后面，但没有运气。知道为什么会这样吗？
此外，当我在代码运行后从剪贴板粘贴时，无需重新复制数据透视表，它就没有问题。
由于
答案 0 :(得分：1)
这有效：
pt.TableRange1.Copy
newPPT.ActiveWindow.View.PasteSpecial ppPasteHTML
我不知道为什么它没有使用形状贴特殊，但这是一种解决方法。
任何人都知道为什么会这样吗？