通过VBA实现重复的PPT编辑操作
2012-06-01 22:58
169 查看
最近一同事需要对几十个PPT进行重复的操作:打开每个PPT后,只保留每页中的图片,而把其它内容都删除掉。这个操作如果手工完成简直痛苦死了,如果用VBA的话简单几行代码就可以节省不少时间。
Sub TEST()
Dim oShape As Shape
Dim oSlide As Slide
For Each oSlide In ActivePresentation.Slides
For Each oShape In oSlide.Shapes
If oShape.Name <> "GDIImage" Then oShape.Delete
Next
Next
End Sub
我最熟悉的还是Excel VBA的编程,虽然方法是互通的,但是对象模型不同,再加上好久没写VBA了,写这几行代码也还是查了一会儿,不过能帮同事节省不少体力劳动。所以在这里做个记录,下次再需要写类似的代码就会快些了。
我一直认为,VBA是很强大的工具。很多企业平时需要的一些业务数据电子化后的查询、处理等任务,完全可以通过VBA自动实现,甚至可以开发出适合行业使用的应用。
本文出自 “三万六千日” 博客,请务必保留此出处http://nilsx.blog.51cto.com/2655156/885186
Sub TEST()
Dim oShape As Shape
Dim oSlide As Slide
For Each oSlide In ActivePresentation.Slides
For Each oShape In oSlide.Shapes
If oShape.Name <> "GDIImage" Then oShape.Delete
Next
Next
End Sub
我最熟悉的还是Excel VBA的编程,虽然方法是互通的,但是对象模型不同,再加上好久没写VBA了,写这几行代码也还是查了一会儿,不过能帮同事节省不少体力劳动。所以在这里做个记录,下次再需要写类似的代码就会快些了。
我一直认为,VBA是很强大的工具。很多企业平时需要的一些业务数据电子化后的查询、处理等任务,完全可以通过VBA自动实现,甚至可以开发出适合行业使用的应用。
本文出自 “三万六千日” 博客,请务必保留此出处http://nilsx.blog.51cto.com/2655156/885186
相关文章推荐
- MFC通过COM接口实现PPT相关操作
- iOS 通过textfield的代理方法实现不进入编辑,实现别的操作
- C#如何实现在PPT文档中插入、编辑和删除表格的操作
- 编码实现环状单向链表(尾指针直接指向头指针,中间没有空节点),去除连续的重复元素的操作。
- React Native 之 通过AsyncStorage 实现数据持久化操作
- 实现cxDateEdit控件只能通过下拉框选择日期,无法再编辑框输入日期
- 通过结构体指针实现顺序链表的基础操作
- MFC通过获取菜单句柄,实现菜单的基本操作
- 通过隐藏iframe实现无刷新上传文件操作
- Asp.net MVC防止图片盗链的实现方法,通过自定义RouteHandler来操作
- 通过enter键实现登录操作
- saltstack常用操作----salt-api 实现 通过http请求远程调用saltstack的步骤
- 通过消除重复逻辑,实现解耦
- 通过Freemarker实现页面静态化的基本操作
- 使用easyui实现数据表格行内编辑以及将表中数据传到后台的一系列操作
- C++通过COM接口操作PPT
- 通过FTP4J 实现FTP各种操作
- 稳扎稳打Silverlight(57) - 4.0通信之WCF RIA Services: 概述, 通过 DomainDataSource 实现数据的添加、查询、更新和删除操作
- 稳扎稳打Silverlight(57) - 4.0通信之WCF RIA Services: 概述, 通过 DomainDataSource 实现数据的添加、查询、更新和删除操作
- 通过Spring @PostConstruct 和 @PreDestroy 方法 实现初始化和销毁bean之前进行的操作