资源描述:
《深入理解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