VBA函数 find

Range.Find 方法 (Excel)

在区域中查找特定信息。

语法

表达式.Find (What, After, LookIn, LookAt, SearchOrder, SearchDirection, MatchCase, MatchByte, SearchFormat)

expression 一个表示 Range 对象的变量。

参数

名称	必需/可选	数据类型	说明
What	必需	Variant	要搜索的数据。可为字符串或任意 Microsoft Excel 数据类型。
After	可选	Variant	要在其后开始搜索的单元格。从用户界面搜索时，这对应于活动单元格的位置。请注意，After 必须是区域内的单个单元格。请注意，搜索在此单元格之后开始；在方法回绕到此单元格之前，不会搜索指定的单元格。如果未指定此参数，搜索将在区域左上角的单元格后面开始。
LookIn	可选	Variant	可以是下列 XlFindLookIn 常量之一：xlFormulas、xlValues、xlComments 或 xlCommentsThreaded。
LookAt	可选	Variant	可以是下列 XlLookAt 常量之一：xlWhole 或 xlPart。
SearchOrder	可选	Variant	可以是以下 XlSearchOrder 常量之一：xlByRows 或 xlByColumns。
SearchDirection	可选	XlSearchDirection	搜索的方向。
MatchCase	可选	Variant	如果为 True，则搜索区分大小写。默认值为 False。
MatchByte	可选	Variant	仅在选择或安装了双字节语言支持时使用。如果为 True，则双字节字符仅匹配双字节字符。如果为 False，则双字节字符匹配其单字节等效字符。
SearchFormat	可选	Variant	搜索格式。

返回值

一个 Range 对象，它代表在其中找到该信息的第一个单元格。

注解

如果未发现匹配项，此方法返回 Nothing。 Find 方法不会影响所选内容或活动单元格。

每次使用此方法时，都会保存 LookIn、LookAt、SearchOrder 和 MatchByte 的设置。如果在下次调用此方法时不指定这些参数的值，则使用保存的值。设置这些参数会更改“查找”**** 对话框中的设置，更改“查找”**** 对话框中的设置会更改省略参数时使用的已保存值。为避免出现问题，请在每次使用此方法时显式设置这些参数。

使用 FindNext 和 FindPrevious 方法可重复搜索。

当搜索到达指定的搜索区域末尾时，它会绕到该区域开头位置。若要在发生此绕回时停止搜索，请保存第一个找到的单元格的地址，然后针对此保存的地址测试每个连续找到的单元格地址。

若要查找与更复杂模式匹配的单元格，请将 For Each...Next 语句与 Like 运算符结合使用。例如，以下代码搜索区域 A1:C5 中使用其名称以字母 Cour 开头的字体的所有单元格。 Microsoft Excel 找到一个匹配项时，会将字体更改为 Times New Roman。

For Each c In [A1:C5] If c.Font.Name Like "Cour*" Then c.Font.Name = "Times New Roman" End If Next`

示例

本示例在第一个工作表的单元格区域 A1:A500 中查找包含值 2 的所有单元格，并将这些单元格的值更改为 5。

With Worksheets(1).Range("a1:a500")

Set c = .Find(2, lookin:=xlValues)

If Not c Is Nothing Then

firstAddress = c.Address

c.Value = 5

Set c = .FindNext(c)

Loop While Not c Is Nothing

End If

End With

转载于:https://www.cnblogs.com/inocalli/p/11003881.html

VBA函数 find相关推荐

合并excel文件 C语言,如何用VBA函数合并多个文件
Excel合并多个文件 Sub CombineWorkbooks() Dim FilesToOpen Dim x As Integer On Error GoTo ErrHandler Applica ...
access vba函数
access vba函数 Abs 函数返回参数的绝对值,其类型和参数相同. 语法 Abs(number) 必要的 number 参数是任何有效的数值表达式,如果 number 包含 Null,则返回 ...
【VBA(八)：在VBA中使用公式】【工作表函数+VBA函数+小结】
上一篇:[VBA(七):事件与典型应用案例][关于单元格格式设置中的WITH语句+事件与典型应用案例+小结与练习] 文章目录工作表函数 VBA函数 InStr Split 小结概念常用VBA函数 ...
vba九九乘法表代码_Excel中使用vba函数制作九九乘法表的操作方法
在excel中使用vba制作九九乘法表,如何进行具体操作的呢?今天,学习啦小编就教大家在Excel中使用vba函数制作九九乘法表的操作技巧. Excel中使用vba函数制作九九乘法表的操作步骤如下: ...
c++字符数组整数转换中文大写金额的形式_数字大写转换烦，内置格式多缺陷， VBA函数来解难...
观看视频更直观在Excel中将数字转换为中文大写或小写,有两种方法,一种是设置数据格式:另一种是使用内置的隐蔽函数NumberString函数. 一.设置数据格式在Excel中输入数字后,选中单元 ...
计算机vba函数,excel vba求平均值_求VBA编程或EXCEL公式(函数)
最佳答案 =IF(AND(--SUBSTITUTE($C$2,MID($B4,1,1),"")=$C$2,--SUBSTITUTE($C$2,MID($B4,2,1)," ...
VBA Instr()函数返回搜索到的字符位置 - VBA函数学习笔记（三）
Instr函数是十分实用的,它可以查询某个字符串在另一个字符串中是否出现,并且返回该查询字符串最先出现的索引位置.Instr函数常常与Mid函数一起使用,会有非常好用的效果.不过Instr函数并非Ex ...
[vba] 函数返回多个值
一, 使用数组即使返回的值是对象,也可以使用对象数组 Sub test_arr_obj() brr = sCreatWorkBook("titt") brr(2).Range(& ...
自定义VBA函数（Fucntion）怎样才能只被VBA引用？
实例需求:对于VBA代码实现的自定义函数,希望只能在VBA过程中被调用,而在工作表单元格的公式使用此自定义函数. 为啥存在这么奇葩的应用场景呢,其实我也不知道,只能认为存在的就是合理的. 通常VBA自 ...
把excel每一行中的数据输出为一个txt文档的VBA函数
excel vba代码: Sub makeTxt()For i = 1 To 1088'从第1行到1088行(最后一行)On Error Resume Next'出现错误时继续运行脚本Open &qu ...

VBA函数 find

VBA函数 find相关推荐

最新文章

热门文章