深入理解c 对象模型 从 .net 开发人员的角度理解 excel 对象模型

深入理解c 对象模型 从 .net 开发人员的角度理解 excel 对象模型

ID:36968818

大小:31.50 KB

页数:10页

时间:2019-05-05

深入理解c 对象模型 从 .net 开发人员的角度理解 excel 对象模型_第1页
深入理解c 对象模型 从 .net 开发人员的角度理解 excel 对象模型_第2页
深入理解c 对象模型 从 .net 开发人员的角度理解 excel 对象模型_第3页
深入理解c 对象模型 从 .net 开发人员的角度理解 excel 对象模型_第4页
深入理解c 对象模型 从 .net 开发人员的角度理解 excel 对象模型_第5页
资源描述:

《深入理解c 对象模型 从 .net 开发人员的角度理解 excel 对象模型》由会员上传分享,免费在线阅读,更多相关内容在学术论文-天天文库

1、深入理解c对象模型从.NET开发人员的角度理解Excel对象模型导读:就爱阅读网友为您分享以下“从.NET开发人员的角度理解Excel对象模型”的资讯,希望对您有所帮助,感谢您对92to.com的支持!以下示例来自示例工作簿,它搜索一个范围(名称为“Fruits”),并更改含有单词“apples”的单元格的字体(图27显示了搜索结果)。这个过程也使用了FindNext方法,它使用前面设好的搜索设置重复搜索。(Range.FindPrevious方法和Range.FindNext方法的使用几乎一样,但这个示例没用

2、到。)您要指定在哪个单元格后搜索,而剩下的就由FindNext方法处理。图27.包含单词“apples”的单元格的搜索结果10提示FindNext(和FindPrevious)方法一旦搜索到范围的末端,就会重新回到搜索范围的开始位置。要确保搜索不会成为无限循环,永远不休,您需要在代码中设定。示例过程演示了处理这种情况的一种方法。如果您想完全避免这种无限循环,或者您想进行一个比Find/FindNext/FindPrevious方法更加复杂的搜索,那么您也可以使用一个ForEach循环在一个范围内对所有单元格进行

3、循环查找。单击示例工作簿的RangeClass工作表中的Find链接来运行以下过程:'VisualBasicPrivateSubDemoFind()DimrngAsExcel.Range=ThisApplication.Range("Fruits")DimrngFoundAsExcel.Range'Keeptrackofthefirstrangeyoufind.DimrngFoundFirstAs10Excel.Range'Youshouldspecifyallthe

4、separameters'everytimeyoucallthismethod,sincethey'canbeoverridenintheuserinterface.rngFound=rng.Find(_"apples",,_Excel.XlFindLookIn.xlValues,Excel.XlLookAt.xlPart,_Excel.XlSearchOrder.xlByRows,Excel.XlSearchDirection.xlNext,False)WhileNotrn

5、gFoundIsNothingIfrngFoundFirstIsNothingThenrngFoundFirst=10rngFoundElseIfrngFound.Address=rngFoundFirst.AddressThenExitWhileEndIfWithrngFound.Font.Color=ColorTranslator.ToOle(Color.Red).Bold=TrueEndWithrngFound=rng.FindNext(rngFound)EndWhileEndSub10//C#priva

6、tevoidDemoFind(){Excel.Rangerng=ThisApplication.get_Range("Fruits",Type.Missing);Excel.RangerngFound;//Keeptrackofthefirstrangeyoufind.Excel.RangerngFoundFirst=null;//Youshouldspecifyalltheseparameters//everytimeyoucallthismethod,sincethey10//canbe

7、overridenintheuserinterface.rngFound=rng.Find("apples",Type.Missing,Excel.XlFindLookIn.xlValues,Excel.XlLookAt.xlPart,Excel.XlSearchOrder.xlByRows,Excel.XlSearchDirection.xlNext,false,Type.Missing,Type.Missing);while(rngFound!=null){if(rngFoundFirs

8、t==null){rngFoundFirst=rngFound;}10elseif(GetAddress(rngFound)==GetAddress(rngFoundFirst)){break;}rngFound.Font.Color=ColorTranslator.ToOle(Color.Red);rngFound.Font.Bold=true;rngFound=rng.FindNe

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。