PPT vba从Execl 拷贝图表

在PPT 需要引用Execl的COM组件 Dim wkb As Workbook Sub Change() Set wkb = Workbooks.Open("D:\D2_月报基础数据.xlsx") Set PPSlide_name = ActivePresentation.Slides(9) ActiveWindow.View.GotoSlide (9) ...
posted @ 2018-12-21 14:20  tunb  阅读(826)  评论(0)  编辑  收藏  举报