我想我明白你的意思了。例如，假设您想要以下字符串中最右边的\(存储在单元格A1中)：

Drive:\Folder\SubFolder\Filename.ext

要获得最后一个\的位置，可以使用以下公式：

=FIND("@",SUBSTITUTE(A1,"\","@",(LEN(A1)-LEN(SUBSTITUTE(A1,"\","")))/LEN("\")))

这告诉我们最右边的\在字符24处。它通过查找"@“并将最后一个"\”替换为"@“来做到这一点。它使用下面的方法确定最后一个

(len(string)-len(substitute(string, substring, "")))\len(substring)

在此场景中，子字符串仅为"\“，长度为1，因此您可以省略末尾的分隔符，只需使用：

=FIND("@",SUBSTITUTE(A1,"\","@",LEN(A1)-LEN(SUBSTITUTE(A1,"\",""))))

现在我们可以使用它来获取文件夹路径：

=LEFT(A1,FIND("@",SUBSTITUTE(A1,"\","@",LEN(A1)-LEN(SUBSTITUTE(A1,"\","")))))

下面是不带尾部的文件夹路径\

=LEFT(A1,FIND("@",SUBSTITUTE(A1,"\","@",LEN(A1)-LEN(SUBSTITUTE(A1,"\",""))))-1)

只获取文件名：

=MID(A1,FIND("@",SUBSTITUTE(A1,"\","@",LEN(A1)-LEN(SUBSTITUTE(A1,"\",""))))+1,LEN(A1))

但是，这里是获取特定角色的最后一个实例右侧的所有内容的另一个版本。因此，使用我们的相同示例，这也将返回文件名：

=TRIM(RIGHT(SUBSTITUTE(A1,"\",REPT(" ",LEN(A1))),LEN(A1)))

创建一个自定义函数并在您的公式中使用它如何？VBA有一个内置的函数 InStrRev ，它可以做你想要的事情。

将其放入一个新模块中：

Function RSearch(str As String, find As String)
    RSearch = InStrRev(str, find)
End Function

您的函数将如下所示(假设原始字符串为B1格式)：

=LEFT(B1,RSearch(B1,"\"))

tigeravatar和Jean-François Corbett建议使用此公式来生成"\“字符最后一次出现的字符串右侧

=TRIM(RIGHT(SUBSTITUTE(A1,"\",REPT(" ",LEN(A1))),LEN(A1)))

如果用作分隔符的字符是空格“"，则必须将公式更改为：

=SUBSTITUTE(RIGHT(SUBSTITUTE(A1," ",REPT("{",LEN(A1))),LEN(A1)),"{","")

无需提及，"{“字符可以替换为任何不会”正常“出现在要处理的文本中的字符。