作者:excel函数与vba实例 2018-04-18 12:10:33
我们在文本数据提取过程中会使用到常见的FIND函数,运用这个函数去从一段话当中提取我们需要的内容。当然如果数据较少的情况下我们可以使用一条函数即可,但是当工作量较大的时候就需要考虑怎么简化我们的操作。所以今天我们就来学学怎么在VBA中用FIND进行数据查找。今天主要初步讲解一下find方法在VBA当中的运用。
▼Find方法介绍▼
Find使用方法与表格里面的查找是一样的,但是VBA代码中参数会比较多。如下:
如上图,FIND相关参数如下表格解释。
表达式.Find(What, After, LookIn, LookAt, SearchOrder, SearchDirection, MatchCase, MatchByte, SearchFormat)
名称 | 必需 | 数据类型 | 说明 |
What | 必选 | Variant | 要搜索的数据。可为字符串或任意 Microsoft Excel 数据类型。 |
After | 可选 | Variant | 表示搜索过程将从其之后开始进行的单元格。此单元格对应于从用户界面搜索时的活动单元格的位置。请注意:After 必须是区域中的单个单元格。要记住搜索是从该单元格之后开始的;直到此方法绕回到此单元格时,才对其进行搜索。如果不指定该参数,搜索将从区域的左上角的单元格之后开始。 |
LookIn | 可选 | Variant | 信息类型。 |
LookAt | 可选 | Variant | 可为以下 XlLookAt 常量之一:xlWhole 或 xlPart。 |
SearchOrder | 可选 | Variant | 可为以下 XlSearchOrder 常量之一:xlByRows 或 xlByColumns。 |
SearchDirection | 可选 | XlSearchDirection | 搜索的方向。 |
MatchCase | 可选 | Variant | 如果为 True,则搜索区分大小写。默认值为 False。 |
MatchByte | 可选 | Variant | 只在已经选择或安装了双字节语言支持时适用。如果为 True,则双字节字符只与双字节字符匹配。如果为 False,则双字节字符可与其对等的单字节字符匹配。 |
SearchFormat | 可选 | Variant | 搜索的格式。 |
▼案例:查找最后一个单元格▼
代码:
Sub 查找最后一个单元格()
Set endrng = Cells.Find("*", , xlFormulas, , , xlPrevious)
Range([a1], endrng).Select
End Sub
解释:
1、设置用set自定义一个范围变量endrng;
2、先运用FIND方法查找到最后一个单元格区域;
3、将A1至查找到的最后一个单元格区域连接起来进行选择。
现在有没有学会这个函数的使用啊。