使用VBA将PPT中的图片复制到EXCEL中

seigaku 2010-06-17 06:07:04

我想在excel中写VBA代码实现打开一个PPT，并将这个PPT中某一页的图片拷贝到另一个EXCEL中和另一个PPT中。
请高手帮忙，谢谢大家。

...全文

269 2 打赏收藏转发到动态举报

写回复

2 条回复

切换为时间正序

请发表友善的回复…

发表回复

赵4老师 2010-06-18

打赏
举报

回复

先手动记录一个宏，然后查看和修改这个宏。

seigaku 2010-06-18

打赏
举报

回复

使用Excel调用的时候不能使用ActiveWindow方法

有时候需要获取PPT幻灯片中的所有标题，如果手工的复制肯定很慢，那么可以用vba批量获取，提高工作效率。

我自己从几个地方下载后合成的pdf文档，关键是内容都可以直接copy出来复制到word或ppt里的，所以很适合做为老师做课件的基础资料，不用打字了。。。内容包括excel和word VBA 358页。

Excel2007实例教程宣传培训中心——IT办公软件培训系列 EXCEL2007实例教程PPT-自做培训用!目前最全教程!全文共60页，当前为第1页。目录第一部分：数据操作第二部分：公式及函数第三部分：图表及数据透视表 EXCEL2007实例教程PPT-自做培训用!目前最全教程!全文共60页，当前为第2页。 Excel2007基础知识 1 PART1 基础知识 EXCEL2007实例教程PPT-自做培训用!目前最全教程!全文共60页，当前为第3页。第一节 Excel2007概述刚刚开始接触基本掌握常用功能熟练使用常用功能+数据透视表+公式 …+数组公式+VBA简单编程 Excel技能+专业知识+行业经验新手初级用户中级用户高级用户专家 Excel用户水平的5个层次 EXCEL2007实例教程PPT-自做培训用!目前最全教程!全文共60页，当前为第4页。 Excel的工作界面 Office按钮功能区编辑栏快速访问工具栏状态栏 EXCEL2007实例教程PPT-自做培训用!目前最全教程!全文共60页，当前为第5页。第二节电子表格的基本操作（1）工作簿（Workbooks）：电子表格软件Excel生成的一个文档文件工作簿文件的默认扩展名：.xlsx（未启用宏），是基于XML的新的文件格式启用宏的Excel工作簿文件扩展名：.xlsm 模板文件扩展名：.xltx 默认情况下，可包含三个工作表工作表的标签为Sheet1、Sheet2等，标签可设置颜色工作表的有关操作 (1) 插入 (2)删除 (3)重命名 (4) 移动或复制 (5)保护工作表 (6) 隐藏工作表（2）工作表（Spreadsheet）： EXCEL2007实例教程PPT-自做培训用!目前最全教程!全文共60页，当前为第6页。基础知识 (3) 单元格： 1、单元格的访问方式：（单元格的地址） A1方式：列号行号，如B3 R1C1方式：R行C列，如R3C3 2、列数、行数列标：A,B…AA…ZZ,AAA…XFD，共有16384列行号：1,2,3….1048576行最后一个单元格的地址：XFD1048576 2003版 65536行*65536列 EXCEL2007实例教程PPT-自做培训用!目前最全教程!全文共60页，当前为第7页。基础知识单元格区域的表示方法 1．矩形区域的４种表示： A2:D5 A5:D2 D5:A2 D2:A5 2．单行、单列、若干行、若干列区域:　 6:6 H:H 3:5 　 D:F 3．两区域公共部分：(交) (B4:K6　D1:F8)　 (空格) 4．多区域： (并) A1:B5, K8, 9:9, H:J (逗号) EXCEL2007实例教程PPT-自做培训用!目前最全教程!全文共60页，当前为第8页。基础知识 5．不同工作表单元格的表示: (!) 例：=SUM(Sheet1!A2:B4, Sheet2!F5) 6．不同工作簿的单元格的表示：([工作簿文件名]工作表！单元格) 单元格区域的表示方法 EXCEL2007实例教程PPT-自做培训用!目前最全教程!全文共60页，当前为第9页。基础知识实例例1：区域表示正确答案：C 如果当前工作表[abcc.xlsx]Sheet2中的单元格E37的内容为公式： =SUM(Sheet3!D5,G8,[练习题_函数.xlsx]Sheet2!B3)，则单元格E37 的内容涉及___个工作表? A）1 B）2 C）3 D）4 EXCEL2007实例教程PPT-自做培训用!目前最全教程!全文共60页，当前为第10页。基础知识实例例2：区域表示区域 (A2:K8 D:E)是包含多少个单元格？提示：在名称框中直接输入区域地址按回车键，查看被选取的单元格数目。正确答案：14个 EXCEL2007实例教程PPT-自做培训用!目前最全教程!全文共60页，当前为第11页。数据的输入与编辑 2 PART1 基础知识 EXCEL2007实例教程PPT-自做培训用!目前最全教程!全文共60页，当前为第12页。主要知识点单元格格式设置单元格条件格式查找替换功能（通配符的使用）自动填充选择性粘贴数据有效性排序及筛选（高级筛选） EXCEL2007实例教程PPT-自做培训用!目前最全教程!全文共60页，当前为第13页。第一节输入各种不同类型的数据在Excel中，对输入的数据自动区分为数值型纯数值型日期型时间型文本型逻辑型不同的数据类型在单元格内默认的对齐方式不同，数值型右对齐，文本型左对齐，逻辑型居中。 EXCEL2007实例教程PPT-自做培训用!目前最全教程!全文共60页，当前为第14页。输入各种不

复制代码代码如下:#-*- coding:utf-8 -*- from win32com.client import Dispatch import time def start_office_application(app_name): # 在这里获取到app后，其它的操作和通过VBA操作办公软件类似 app = Dispatch(app_name) app.Visible = True time.sleep(0.5) app.Quit() if __name__ == ‘__main__’: ””’ 通过python启动办公软件的应用进程，其中wpp、et、wpp对应的是金山文件、表格

SOAOFFICE - 微软 OFFICE 中间件 SOAOffice 中间件是北京科翰软件为微软OFFICE量身打造的Web中间件，是Web调用Office、存取Office数据的必备中间件。SOAOffice中间件由服务器端数据组件和客户端显示控件构成。 SOAOffice 完全抛弃了传统利用Office服务器端自动化技术存取文档数据的种种弊端和缺陷，采用独创的专利技术构建了一个功能强大、简单易用的微软Office中间件平台，平台提供标准的.net和java组件接口，不但能够在线（浏览器页面）打开、编辑、保存Office文档，而且开发人员还能够以简洁的代码快速的将数据库数据动态填充到Office文档指定位置，并且也能够从Office文档中提取指定位置的数据保存到数据库。 SOAOffice提供这些强大功能的同时，服务器端并不需要安装运行Office软件。通过SOAOffice，在Web世界里，难以驯服的Word/Excel就变成了普通的、熟悉的、服务器端可调用的.Net组件、Java组件、ASP组件、PHP组件，开发人员再也不用研究复杂的Word/Excel COM自动化细节、学习复杂的VBA语法调用，也不用去应对Word/Excel死进程、系统稳定运行的问题。开发人员能够节省宝贵的精力和时间，把它投放到更重要的业务逻辑和系统架构上，而控制Office的具体技术细节交给SOAOffice去做。 SOAOffice除了提供Word/Excel动态数据填充，Word/Excel数据导入导出，Word/Excel/PowerPoint等Office文档的在线打开、编辑、保存，权限控制，只读控制等功能外，还给在线办公内置了强大的支持功能：强制痕迹保留，手写批注，圈阅签字，手写签名，电子印章、数字签名、模板套红、一键套红等。科翰软件是国内唯一的微软Office中间件开发商，拥有卓越的自主研发实力和独创的专利技术，其产品SOAOffice不仅畅销国内，而且还远销欧美国际市场，其中世界500强美国Dover集团、可口可乐 Coca-Cola、中石油、中石化等都是SOAOffice产品的忠实客户。 SOAOFFICE中间件主要应用在Web系统下所有涉及编程调用Office的领域，例如： 1. 需要把数据库字段内容填充到Word/Excel指定位置的； 2. 需要把Word/Excel指定位置的内容提取出来保存到数据库字段的； 3. 需要动态生成指定格式的Word文档的； 4. 需要把html页面中表格导出到excel的； 5. 需要在html页面中套打票据、报表的； 6. 需要在html页面中显示复杂报表，并要求精确打印预览及打印的； 7. 需要动态生成中国式复杂格式报表的； 8. 需要在html页面中输入复杂票据的； 9. 使用COM服务器自动化技术调用Word/Excel经常产生死进程或系统不稳定的； 10.Web系统中调用Word/Excel的页面有大量并发用户访问的； 11.使用jacob、jxl、apache poi的； 12.需要在Web中调用Word/Excel，并且追求系统运行稳定、可靠的； 13.最终用户可以浏览 Word/Excel/Ppt 文档内容，但需要禁止复制、粘贴、下载、另存的； 14.需要在html页面中在线编辑Word公文的； 15.需要在协同办公中强制保留Word修改痕迹的； 16.需要在协同办公中手写批注、手写签名、加盖电子印章、模板套红的； 17.需要在新闻编辑中强制保留Word修改痕迹、手写批注、圈阅的； 18.需要在远程教育中实现试卷、作业在线批改的。 19.需要在html页面中把Word转换为pdf的； 20.需要在html页面中快速打开、显示pdf的； 21.需要在Ajax架构里调用Word/Excel的，包括服务器端和客户端Javascript都适用。 22.需要控制不同的用户在Word/Excel中不同的区域中编辑权限的； 23.需要在企业局域网内架设在线Office文档中心、知识管理的； 24.需要在web页面导入导出Excel单元格数据的； ……… SOAOFFICE中间件包括三个内置组件：SOAExcel、SOAWord、SOAPowerPoint。另外企业版还包括支持PDF文件的SOAPDF组件。 SOAOFFICE 中间件采用标准HTTP传输协议，跨平台性好，支持任意Web服务器（IIS，WebLogic，WebSphere，Apache，Tomcat，Domino等），任意服务器操作系统（Win2k， Win2003，Win2008，Linux，Unix等），任意数据库（Access，SQL Server，Oracle，MySQL，DB2，Sybase等），以及任意WEB编程语言和Web架构（C#，Java，VB.Net，PHP，DOMINO，JSP，ASP，J2EE，ASP.NET，Ajax等）。SOAOFFICE同时支持C/S方式的编程和其他支持ActiveX的容器，您可以在VB，Delphi以及C++ Builder中使用本中间件，快速创建C/S结构的应用。 SOAOFFICE中间件是一个国际化产品，支持多种界面语言：简体中文、繁体中文、英语、日语、法语、德语等。

2,462

社区成员

10,807

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章