请教怎么用VB抓取excel文档中的内容并复制到powerpoint

请问如何用VB抓取excel文档中的内容并复制到powerpoint
我想通过VB宏抓取指定excel文件中的内容（指定工作薄、指定行、指定列），复制并粘贴至powerpoint中，请问该如何写这样的宏代码？

能给个示例吗？

[解决办法]

探讨

我想通过VB宏抓取指定excel文件中的内容（指定工作薄、指定行、指定列），复制并粘贴至powerpoint中，请问该如何写这样的宏代码？

能给个示例吗？

[解决办法]
第一步，在VB中创建一个Excle对象，获取指定单元格内容，并存放在str变量中：

str=objExcel.Application.Cells(1, 1)

第二步，在VB中创建一个PPT对象，对用这个PPT对象在第一张幻灯片中创建一个文本框，并把上面获取的内容赋值到这个文本框中：
objPPT.ActiveWindow.Selection.SlideRange.Shapes.AddTextbox(msoTextOrientationHorizontal, 0, 0, 100, 100).Select
objPPT.ActiveWindow.Selection.TextRange.Text = str
[解决办法]
xx.select
xx.copy
xx.paste

查看更多 下一篇