首页 将PPT中所有文本框里的文字提取出来

将PPT中所有文本框里的文字提取出来

将PPT中所有文本框里的文字提取出来将PPT中所有文本框里的文字提取出来打开PPT，按ALT+F11打开VBA编辑器，在左面的工程视图里点击右键，选择插入->模块，添加一个模块，名字都不用改。然后点击顶部的“工具”菜单，选择引用，找“MicrosoftWordX.0ObjectLibrary”（其中X与你的OFFICE版本有关），钩上，点确定将下列代码贴到刚建立的模块里，按F5即可SubMain() OnErrorResumeNext DimtempAsNewWord.Document,tmpShapeAsShape,tmpSlideAs...

将 ppt 中所有文本框里的文字提取出来打开PPT，按ALT+F11打开VBA编辑器，在左面的工程视图里点击右键，选择插入->模块，添加一个模块，名字都不用改。然后点击顶部的“工具”菜单，选择引用，找“MicrosoftWordX.0ObjectLibrary”（其中X与你的OFFICE版本有关），钩上，点确定将下列代码贴到刚建立的模块里，按F5即可SubMain() OnErrorResumeNext DimtempAsNewWord.Document,tmpShapeAsShape,tmpSlideAsSlide ForEachtmpSlideInActivePresentation.Slides ForEachtmpShapeIntmpSlide.Shapes temp.Range().Text=temp.Range()+tmpShape.TextFrame.TextRange.Text NexttmpShape NexttmpSlide temp.Application.Visible=TrueEndSub复制以上代码后，f5，就会打开一个word，另存为即可。

                    本文档为【将PPT中所有文本框里的文字提取出来】，请使用软件OFFICE或WPS软件打开。作品中的文字与图均可以修改和编辑，
                    图片更改请在作品中右键图片并更换，文字修改请直接点击文字进行修改，也可以新增和删除文档中的内容。 
 该文档来自用户分享，如有侵权行为请发邮件ishare@vip.sina.com联系网站客服，我们会及时删除。

                    [版权声明] 本站所有资料为用户分享产生，若发现您的权利被侵害，请联系客服邮件isharekefu@iask.cn，我们尽快处理。

                    本作品所展示的图片、画像、字体、音乐的版权可能需版权方额外授权，请谨慎使用。

                    网站提供的党政主题相关内容(国旗、国徽、党徽..)目的在于配合国家政策宣传，仅限个人学习分享使用，禁止用于任何广告和商用目的。
                

下载需要：免费已有0 人下载

立即下载

你可能还喜欢

最新资料

资料动态

专题动态

慢慢文档

8年外贸单证以及相关的工作经验

格式：doc

大小：14KB

软件：Word

页数：1

分类：

上传时间：2023-04-11

浏览量：14

热点搜索

体育场馆运营管理办法优质护理服务质量改进鱼骨图 SB T 10404-2006 水载型防腐剂和阻燃剂主要成分的测定《MTV学英语》当家花旦爱戴全接触塔吊工程重大危险源检查台账手持GPS福建省坐标转换参数教你如何挑选手机号码乙醇课件答辩会新闻稿 (4页) 综合素质评价(高一上填写要求) VRay for Sketchup中英文对照表传奇私服一区多服和多机负载的设置方法高三语文一轮复习写作名师公开课省级获奖课件（36张）砖砌体工程验收规范体育场馆运营管理办法优质护理服务质量改进鱼骨图 SB T 10404-2006 水载型防腐剂和阻燃剂主要成分的测定《MTV学英语》当家花旦爱戴全接触塔吊工程重大危险源检查台账手持GPS福建省坐标转换参数教你如何挑选手机号码乙醇课件答辩会新闻稿 (4页) 综合素质评价(高一上填写要求) VRay for Sketchup中英文对照表传奇私服一区多服和多机负载的设置方法高三语文一轮复习写作名师公开课省级获奖课件（36张）砖砌体工程验收规范