用C#实现在PowerPoint文档中搜索文本
时间:2011-03-10
来源:互联网
用编程的方式根据对象模型很容易实现在、文档中搜索文本,在里面也同样如此,使用对象模型有助于我们了解的文档结构。
搜索的思路和方法基本是一样的,用应用程序对象打开指定的文档,用文档对象获取文档,再使用合适的对象将文档分割成搜索范围适中的对象进行搜索。
打开的A帮助文档VBAPP10.CHM,根据对象模型图,很容易找到我们需要的几个集合和对象:Application、Presentations、Presentation、Slides、Slide、TextFrame、TextRange。其中Presentation代表一个 文档,Slide表示PowerPoint文档中的单张幻灯片,TextFrame是幻灯片上的文本框,TextRange是文本框中的文本。
打开文档:string filename="";
.Application pa=new .ApplicationClass();
.Presentation pp=pa.Presentations.Open(filename,
Microsoft..Core.MsoTriState.msoTrue,
Microsoft..Core.MsoTriState.msoFalse,
Microsoft..Core.MsoTriState.msoFalse);
Open()方法的第三个参数在帮助文档中的说明如下:
Untitled 可选。MsoTriState 类型。指定文件是否有标题。
因为是Untitled,所以按照上面的代码,打开文档之后才能引用文档的标题,如果不想使用标题,就要把枚举msoFalse改成msoTrue。
搜索文本:
string[] strKeyList={}; //要搜索的文本
.TextRange oText;
foreach(.Slide slide in pp.Slides)
{
foreach(.Shape shape in slide.Shapes)
{
foreach(string strKey in strKeyWordList)
{
oText=null;
oText=shape.TextFrame.TextRange.Find(strKey,0,Microsoft..Core.MsoTriState.msoFalse,Microsoft.Office.Core.MsoTriState.msoTrue);
if (oText!=null)
{
MessageBox.Show("文档中包含指定的关键字 "+strKey+" !","搜索结果",MessageBoxButtons.OK);
continue;
}
}
}
搜索的思路和方法基本是一样的,用应用程序对象打开指定的文档,用文档对象获取文档,再使用合适的对象将文档分割成搜索范围适中的对象进行搜索。
打开的A帮助文档VBAPP10.CHM,根据对象模型图,很容易找到我们需要的几个集合和对象:Application、Presentations、Presentation、Slides、Slide、TextFrame、TextRange。其中Presentation代表一个 文档,Slide表示PowerPoint文档中的单张幻灯片,TextFrame是幻灯片上的文本框,TextRange是文本框中的文本。
打开文档:string filename="";
.Application pa=new .ApplicationClass();
.Presentation pp=pa.Presentations.Open(filename,
Microsoft..Core.MsoTriState.msoTrue,
Microsoft..Core.MsoTriState.msoFalse,
Microsoft..Core.MsoTriState.msoFalse);
Open()方法的第三个参数在帮助文档中的说明如下:
Untitled 可选。MsoTriState 类型。指定文件是否有标题。
因为是Untitled,所以按照上面的代码,打开文档之后才能引用文档的标题,如果不想使用标题,就要把枚举msoFalse改成msoTrue。
搜索文本:
string[] strKeyList={}; //要搜索的文本
.TextRange oText;
foreach(.Slide slide in pp.Slides)
{
foreach(.Shape shape in slide.Shapes)
{
foreach(string strKey in strKeyWordList)
{
oText=null;
oText=shape.TextFrame.TextRange.Find(strKey,0,Microsoft..Core.MsoTriState.msoFalse,Microsoft.Office.Core.MsoTriState.msoTrue);
if (oText!=null)
{
MessageBox.Show("文档中包含指定的关键字 "+strKey+" !","搜索结果",MessageBoxButtons.OK);
continue;
}
}
}
作者: 丽台显卡 发布时间: 2011-03-10
很遗憾通知楼上朋友,您的帖子在24小时之内没有任何回复!
通常情况下,本论坛发布的主题帖会在8小时被回复或处理。您的帖子在24小时之内未被回复,其中的原因可能是:
1、问题表述不清、模棱两可,难以理解,帮助者被搞晕了,夺帖而出;
2、没有上传必要的附件,或附件被遗忘在某个角落;
3、发帖提问时,语气带棱角、带挑衅,不幸被列入不受欢迎的帖子;
4、所提问题不成立,或提不合理的要求,乐于助人者使出“走为上”之计;
5、话题较偏、较冷或者发布到了不合适的版块,暂时无人问津,顾影自怜。
为了提高您的问题解决效率,我们推荐您阅读以下文章:
* 如何发表新话题和上传附件:http://club.excelhome.net/thread-45649-1-1.html
* 发帖的技巧:http://club.excelhome.net/thread-176339-1-1.html
* EH技术论坛的最佳学习方法:http://club.excelhome.net/thread-117862-1-1.html
作者: Admin 发布时间: 2011-03-11
相关阅读 更多
热门阅读
-
office 2019专业增强版最新2021版激活秘钥/序列号/激活码推荐 附激活工具
阅读:74
-
如何安装mysql8.0
阅读:31
-
Word快速设置标题样式步骤详解
阅读:28
-
20+道必知必会的Vue面试题(附答案解析)
阅读:37
-
HTML如何制作表单
阅读:22
-
百词斩可以改天数吗?当然可以,4个步骤轻松修改天数!
阅读:31
-
ET文件格式和XLS格式文件之间如何转化?
阅读:24
-
react和vue的区别及优缺点是什么
阅读:121
-
支付宝人脸识别如何关闭?
阅读:21
-
腾讯微云怎么修改照片或视频备份路径?
阅读:28