(word完整版)Excel宏Vba-Find()函数详细说明.doc

(word完整版)Excel宏VbaFind()函数详细说明
(word完整版)Excel宏VbaFind()函数详细说明
(word完整版)Excel宏VbaFind()函数详细说明
2.Find方法的语法[语法]。Find（What，[After］，［LookIn］，[LookAt]，[SearchOrder]，[SearchDirection］,[MatchCase］，［MatchByte］，［SearchFormat］)[参数说明］(1)，必须指定,返回一个Range对象。（2）参数What，必需指定.代表所要查找的数据,可以为字符串、整数或者其它任何数据类型的数据。对应于“查找与替换”对话框中，“查找内容”文本框中的内容。(3)参数After,可选。指定开始查找的位置,即从该位置所在的单元格之后向后或之前向前开始查找(也就是说，开始时不查找该位置所在的单元格，直到Find方法绕回到该单元格时，才对其内容进行查找）.所指定的位置必须是单元格区域中的单个单元格，如果未指定本参数,则将从单元格区域的左上角的单元格之后开始进行查找.（4)参数LookIn，可选。指定查找的范围类型,可以为以下常量之一：xlValues、xlFormulas或者xlComments,默认值为xlFormulas。对应于“查找与替换”对话框中，“查找范围"下拉框中的选项。(5）参数LookAt,可选。可以为以下常量之一：XlWhole或者xlPart，用来指定所查找的数据是与单元格内容完全匹配还是部分匹配，默认值为xlPart。对应于“查找与替换”对话框中，“单元格匹配”复选框。（6)参数SearchOrder,可选.用来确定如何在单元格区域中进行查找，是以行的方式（xlByRows)查找，还是以列的方式(xlByColumns)查找，默认值为xlByRows。对应于“查找与替换”对话框中,“搜索"下拉框中的选项。(7）参数SearchDirection,可选。用来确定查找的方向，即是向前查找(XlPrevious)还是向后查找(xlNext），默认的是向后查找。（8)参数MatchCase，可选。若该参数值为True,则在查找时区分大小写。默认值为False.对应于“查找与替换"对话框中，“区分大小写"复选框。（9)参数MatchByter,可选.即是否区分全角或半角,在选择或安装了双字节语言时使用。若该参数为True,则双字节字符仅与双字节字符相匹配；若该参数为False，则双字节字符可匹配与其相同的单字节字符。对应于“查找与替换”对话框中,“区分全角/半角”复选框。(10)参数SearchFormat,可选,指定一个确切类型的查找格式.对应于“查找与替换”对话框中，“格式”按钮。当设置带有相应格式的查找时,该参数值为True。（11）在每次使用Find方法后，参数LookIn、LookAt、SearchOrder、MatchByte的设置将保存。如果下次使用本方法时,不改变或指定这些参数的值，那么该方法将使用保存的值。在VBA中设置的这些参数将更改“查找与替换”对话框中的设置；同理，更改“查找与替换”对话框中的设置，也将同时更改已保存的值.也就是说，在编写好一段代码后，若在代码中未指定上述参数，可能在初期运行时能满足要求，但若用户在“查找与替换”对话框中更改了这些参数，它们将同时反映到程序代码中，当再次运行代码时，运行结果可能会产生差异或错误.若要避免这个问题，在每次使用时建议明确的设置这些参数。3.Find方法使用示例3。1本示例在活动工作表中查找what变量所代表的值的单元格,并删除该单元格所在的列。ookIn：=xlValues,按值查找LookAt：=xlWhole，全部匹配，xlPart部分匹配SearchOrder：=xlByRows，按行查找SearchDirection：=xlNext，查找方向，向下查找

3。Find方法使用示例3.1本示例在活动工作表中查找what变量所代表的值的单元格，并删除该单元格所在的列。‘—-——-—---—--———-—--——-—-——--—---—-SubFind_Error（）DimrngAsRangeDimwhatAsStringwhat="Error”DoSetrng=ActiveSheet。UsedRange.Find(what)IfrngIsNothingThenExitDoElseColumns(rng.Column)。DeleteEndIfLoopEndSub‘-—--————————-—————-—---——-——-—————3.2带格式的查找本示例在当前工作表单元格中查找字体为”ArialUnicodeMS"且颜色为红色的单元格。其中，Application.FindF