Excel宏Vba Find()函数详细说明.doc

《Excel宏Vba Find()函数详细说明.doc》由会员上传分享，免费在线阅读，更多相关内容在应用文档-天天文库。

1、2.Find方法的语法[语法].Find(What，[After]，[LookIn]，[LookAt]，[SearchOrder]，[SearchDirection]，[MatchCase]，[MatchByte]，[SearchFormat])[参数说明](1)，必须指定，返回一个Range对象。(2)参数What，必需指定。代表所要查找的数据，可以为字符串、整数或者其它任何数据类型的数据。对应于“查找与替换”对话框中，“查找内容”文本框中的内容。(3)参数After，可选。指定开始查找的位置，即从该位置所在的单元格之后向后或之前向前开始查找(也就

2、是说，开始时不查找该位置所在的单元格，直到Find方法绕回到该单元格时，才对其内容进行查找)。所指定的位置必须是单元格区域中的单个单元格，如果未指定本参数，则将从单元格区域的左上角的单元格之后开始进行查找。(4)参数LookIn，可选。指定查找的范围类型，可以为以下常量之一：xlValues、xlFormulas或者xlComments，默认值为xlFormulas。对应于“查找与替换”对话框中，“查找范围”下拉框中的选项。(5)参数LookAt，可选。可以为以下常量之一：XlWhole或者xlPart，用来指定所查找的数据是与单元格内容完全匹配还是

3、部分匹配，默认值为xlPart。对应于“查找与替换”对话框中，“单元格匹配”复选框。(6)参数SearchOrder，可选。用来确定如何在单元格区域中进行查找，是以行的方式(xlByRows)查找，还是以列的方式(xlByColumns)查找，默认值为xlByRows。对应于“查找与替换”对话框中，“搜索”下拉框中的选项。(7)参数SearchDirection，可选。用来确定查找的方向，即是向前查找(XlPrevious)还是向后查找(xlNext)，默认的是向后查找。(8)参数MatchCase，可选。若该参数值为True，则在查找时区分大小写。

4、默认值为False。对应于“查找与替换”对话框中，“区分大小写”复选框。(9)参数MatchByter，可选。即是否区分全角或半角，在选择或安装了双字节语言时使用。若该参数为True，则双字节字符仅与双字节字符相匹配；若该参数为False，则双字节字符可匹配与其相同的单字节字符。对应于“查找与替换”对话框中，“区分全角/半角”复选框。(10)参数SearchFormat，可选，指定一个确切类型的查找格式。对应于“查找与替换”对话框中，“格式”按钮。当设置带有相应格式的查找时，该参数值为True。(11)在每次使用Find方法后，参数LookIn、Lo

5、okAt、SearchOrder、MatchByte的设置将保存。如果下次使用本方法时，不改变或指定这些参数的值，那么该方法将使用保存的值。在VBA中设置的这些参数将更改“查找与替换”对话框中的设置；同理，更改“查找与替换”对话框中的设置，也将同时更改已保存的值。也就是说，在编写好一段代码后，若在代码中未指定上述参数，可能在初期运行时能满足要求，但若用户在“查找与替换”对话框中更改了这些参数，它们将同时反映到程序代码中，当再次运行代码时，运行结果可能会产生差异或错误。若要避免这个问题，在每次使用时建议明确的设置这些参数。3.Find方法使用示例3.1

6、本示例在活动工作表中查找what变量所代表的值的单元格，并删除该单元格所在的列。ookIn:=xlValues,按值查找LookAt:=xlWhole，全部匹配，xlPart部分匹配SearchOrder:=xlByRows，按行查找SearchDirection:=xlNext，查找方向，向下查找3.Find方法使用示例3.1本示例在活动工作表中查找what变量所代表的值的单元格，并删除该单元格所在的列。‘----------------------------------SubFind_Error()DimrngAsRangeDimwhatAsS

7、tringwhat="Error"DoSetrng=ActiveSheet.UsedRange.Find(what)IfrngIsNothingThenExitDoElseColumns(rng.Column).DeleteEndIfLoopEndSub‘----------------------------------3.2带格式的查找本示例在当前工作表单元格中查找字体为"ArialUnicodeMS"且颜色为红色的单元格。其中，Application.FindFormat对象允许指定所需要查找的格式，此时Find方法的参数SearchForma

8、t应设置为True。‘----------------------------------SubFindWi