vba - InSTR 或在 VBA 中查找函数

Question

我遇到了一个问题。我已经完成研究，发现我可以使用 InSTR 函数来搜索字符串中的特定字符。

我想做的是获取从文件路径中提取的文件名。

目前我有

  InStr(StrFrom(pName), "\")

这里的问题是，它返回第一次出现的斜杠，因为我想获得最后一次出现的斜杠(这样我就可以使用围绕上述代码的“正确”函数来捕获文件名)

感谢任何有关如何获取字符串中最后一个斜杠的帮助!

谢谢!

Answer 1

Instr 从文本字符串的开头查找，InstrRev 从另一端开始查找。

Public Function FileNameOnly(ByVal FileNameAndPath As String) As String

    FileNameOnly = Mid(FileNameAndPath, InStrRev(FileNameAndPath, "\") + 1, Len(FileNameAndPath))

End Function