InSTR或在VBA中查找功能

Question

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

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

目前我有

  InStr(StrFrom(pName), "\")

这里的问题是,它返回第一次出现的斜杠,其中我想得到斜杠的最后一次出现(这样我就可以使用围绕上面代码的'right'函数来捕获文件名)

如何获得字符串中的最后一个斜杠,任何帮助表示赞赏!

谢谢!

Answer 1

Instr从文本字符串的InstrRev开头看,从另一端开始查看.

Public Function FileNameOnly(ByVal FileNameAndPath As String) As String

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

End Function