VBA Instr()函数 返回搜索到的字符位置 - VBA函数学习笔记（三）

Instr函数是十分实用的，它可以查询某个字符串在另一个字符串中是否出现，并且返回该查询字符串最先出现的索引位置。Instr函数常常与Mid函数一起使用，会有非常好用的效果。不过Instr函数并非Excel内置的函数，因此，如果要使用Instr函数和Mid函数搭配，那就必须要使用VBA才行。

语法

InStr([start,] string1, string2 [,compare])

参数

● start - 可选的参数，查找的起始点

● string1 - 必须的参数，要查询的字符串

● string2 - 必须的参数，在哪个字符串中查询

● compare - 可选的参数，有两个值。0 = vbBinaryCompare - 执行二进制比较(默认)，1 = vbTextCompare - 执行文本比较。

说明

这里只说明最后一个参数的含义，vbBinaryCompare表示二进制比较，说明是区分大小写的。而vbTextCompare这边按照文本来比较，那就不区分大小写的。具体大家请参考示例。

示例

Sub test()
  Debug.Print InStr("ABCDEFGxh_ABCDEFG", "C") '3
  Debug.Print InStr(4, "ABCDEFGxh_ABCDEFG", "C") '13
  Debug.Print InStr(4, "ABCDEFGxh_ABCDEFG", "c", vbBinaryCompare) '0
  Debug.Print InStr(4, "ABCDEFGxh_ABCDEFG", "c", vbTextCompare) '13
End Sub