Instr 函数是 Excel 中一种很常用的字符串函数，通过这个函数可以轻松地查找指定字符在字符串中出现的位置，从而方便地对操作字符串。本文将详细介绍 Instr 函数的用法。

一、Instr 函数的基本语法

Instr 函数的语法如下：

```

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

```

- start 是可选的参数，表示在 string1 中开始查找的位置，默认值为 1。

- string1 是必需的参数，表示要在其中查找 string2 的字符串。

- string2 是必需的参数，表示要查找的字符串。

- compare 是可选的参数，表示采用哪种比较方式，包括以下几种：vbBinaryCompare（二进制比较）、vbTextCompare（文本比较）、vbDatabaseCompare（数据库比较），默认值为 vbBinaryCompare。

二、使用 Instr 函数查找指定字符

在使用 Instr 函数查找指定字符之前，需要了解字符串的一些基本操作。

1.字符串的长度

字符串的长度可以通过 Len 函数来获取，该函数的语法如下：

```

Len(string)

```

例如，“abcdefg”字符串的长度为 7。

2.提取字符串中指定的一部分

提取字符串中指定的一部分可以通过 Mid 函数来实现，该函数的语法如下：

```

Mid(string,start,[length])

```

- string 表示要从中提取一部分的字符串。

- start 表示要从字符串中的第几个字符开始提取。

- length 是可选的参数，表示要提取的字符数，如果省略该参数，则提取从 start 开始的所有字符。

例如，对于字符串“abcdefg”，如果要提取“bcd”这个子串，则可以使用以下代码：

```

= MID("abcdefg",2,3)

```

返回值为“bcd”。

有了上面的基础，接下来就可以开始使用 Instr 函数查找指定字符了。

1. 在字符串中查找单个字符

使用 Instr 函数查找指定字符的一个简单实例，例如想要查找到字符串“abcdefg”中是否包含字符“c”：

```

=IF(InStr("abcdefg","c")>0,"Yes","No")

```

这个函数会返回字符串“Yes”表示字符串中包含“c”字符。

2. 在字符串中查找多个字符

如果要查找字符串中不止一个字符，则可以使用 For...Next 循环来遍历字符串中的每个字符，代码如下：

```

Function MultiSearch(string1 as String, string2 as String) As Boolean

For i = 1 to Len(string2)

If InStr(string1,Mid(string2,i,1)) > 0 Then

MultiSearch = True

Exit Function

End If

Next i

MultiSearch = False

End Function

```

在上述示例代码中，MultiSearch 函数用于在 string1 中查找 string2 中的所有字符。首先使用 For...Next 循环遍历字符串 string2 中的每个字符，然后在 string1 中寻找该字符是否存在。如果出现该字符，则将 MultiSearch 的返回值设置为 True，否则返回 False。

3. 忽略大小写区分

如果想要忽略大小写进行查找，则可以在 Instr 函数中指定使用文本比较方式，例如：

```

=IF(InStr(1,"abCde",'c',vbTextCompare)>0,"Yes","No")

```

在这个示例中，使用了 vbTextCompare 参数来进行忽略大小写的查找。

4. 在字符串中查找多次出现的指定字符

如果要查找字符串中所有出现的指定字符，可以使用一个循环语句来依次查找字符串中每个出现的位置。示例代码如下：

```

Sub SearchAllOccurences(ByVal SearchString As String, ByVal SearchChar As String)

Dim i As Long

Dim Occurrence As Long

Occurrence = 0

For i = 1 To Len(SearchString)

If Mid(SearchString, i, 1) = SearchChar Then

Occurence = Occurence + 1

Debug.Print SearchChar & " found at position " & i

End If

Next i

If Occurrence = 0 Then

Debug.Print SearchChar & " not found"

End If

End Sub

```

在上面的例子中，SearchAllOccurences 函数用于在 SearchString 中查找 SearchChar 的所有出现位置。首先，用一个循环遍历 SearchString 中的每个字符，然后使用 Mid 函数查看该字符是否等于所寻找的 SearchChar，如果找到，则增加计数器 Occurrence 的值，记录该字符出现的次数，并在控制台输出该字符的位置。

5. 查找单词

如果希望在字符串中查找单词，则可以使用 Split 函数和 For...Next 循环将字符串拆分成单个单词，然后对每个单词进行 Instr 查找。示例代码如下：

```

Function FindWord(ByVal s As String, ByVal search As String)

Dim a As Variant

Dim i As Long

a = Split(s, " ")

For i = LBound(a) To UBound(a)

If InStr(1, a(i), search, vbTextCompare) Then

FindWord = a(i) & " found in position " & i + 1

Exit Function

End If

Next i

FindWord = ""

End Function

```

在上述示例代码中，FindWord 函数用于在 s 中查找 search 指定的单词。首先，使用 Split 函数将 s 拆分成一个字符串数组 a。然后，使用 For...Next 循环来遍历该字符串数组，对每个单词使用 Instr 函数查找是否包含 search，如果找到，则返回该单词及所在字符串数组中的位置。

三、结语

以上就是关于使用 Instr 函数在 Excel 中查找指定字符的方法及示例，通过这些示例，相信对 Instr 函数的使用已经有了更深入的理解和掌握。在实际应用中，可以根据自己的需要进行灵活使用。