我们在文本数据提取过程中会使用到常见的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至查找到的最后一个单元格区域连接起来进行选择。 现在有没有学会这个函数的使用啊。
|