Excel VBA内置函数—InStrRev函数、InStr 函数---实现从右边查找指定字符第一次出现的位置，以及实现从左边查找指定字符第一次出现的位置

Sub str_test()
    Dim str As String, str1 As String
    str = "sd\sdsds\"
    
    str1 = InStrRev(str, "\")
    MsgBox (str1)   '从右向左查找，返回值是9，核实位置确实在第九位
    
    str1 = InStr(str, "\")
    MsgBox (str1)   '从左向右查找，返回值是3，核实位置确实在第三位
End Sub