阅读量:5
在VBA中,可以使用InStr
函数来查找字符串中字符或子字符串的位置。该函数返回一个整数值,表示字符或子字符串第一次出现的位置。
以下是一个示例代码:
Sub FindStringPosition() Dim str As String Dim searchChar As String Dim position As Integer str = "Hello, World!" searchChar = "o" position = InStr(str, searchChar) If position > 0 Then MsgBox "The character '" & searchChar & "' is found at position " & position & "." Else MsgBox "The character '" & searchChar & "' is not found in the string." End If End Sub
在上面的代码中,我们定义了一个字符串str
和一个要查找的字符searchChar
。然后,我们使用InStr
函数来查找searchChar
第一次出现的位置,并将结果存储在position
变量中。最后,我们根据position
的值弹出一个消息框,显示字符是否被找到以及它的位置。
这是一个简单的例子,你可以根据你的具体需求调整代码来查找字符串中字符或子字符串的位置。