我正在尝试使用VBA脚本通过Excel更新嵌入图表的PowerPoint演示文稿。这在我的代码中工作得很好。问题是,在图表更新之后,我还希望断开/删除指向Excle工作表的链接。
代码示例还显示了我的代码中不起作用的代码行。
任何建议或解决方案都将不胜感激!
Function RefreshPPT()
Set PPT = CreateObject("PowerPoint.Application")
PPT.Visible = True
PPT.Presentations.Open "Name.pptx", Untitled:=msoTrue
PPT.ActivePresentation.UpdateLinks
PPT.ActivePresentation.BreakLinks ------ this line doesn´t work
PPT.ActivePresentation.SaveAs Filename:="Name2.pptx"
PPT.Quit
Set PPT = Nothing
End Function发布于 2012-12-12 22:07:49
谢谢你的回答。
我想我已经解决了问题:特征线命令的语法是错误的。我必须直接处理幻灯片和形状:
PPT.ActivePresentation.Slides(i).Shapes(s).LinkFormat.BreakLinkhttps://stackoverflow.com/questions/13840166
复制相似问题