我来晚了一点，但也许这个能帮上忙。问题中的链接使用了类似的公式，但我的链接使用IF()语句来消除错误。

如果你不怕Ctrl+Shift+Enter，你可以很好地使用数组公式。

字符串(在单元格A1中): “one.two.three.four”

公式:

{=MAX(IF(MID(A1,ROW($1:$99),1)=".",ROW($1:$99)))}  use Ctrl+Shift+Enter

结果:14

首先,

ROW($1:$99)

返回1到99的整数数组:{1,2,3,4，…，98,99}。

接下来,

MID(A1,ROW($1:$99),1)

返回一个在目标字符串中找到的长度为1的字符串数组，然后在达到目标字符串的长度后返回空白字符串:{"o"，"n"，"e"，"."，…"u"，"r"，""，""，""…}

接下来,

IF(MID(I16,ROW($1:$99),1)=".",ROW($1:$99))

将数组中的每个项与字符串"."进行比较，并返回字符串中字符的索引或FALSE: {FALSE,FALSE,FALSE,4,FALSE,FALSE,FALSE,8,FALSE,FALSE,FALSE,FALSE,FALSE, FALSE,14,FALSE,FALSE.....}

最后的

=MAX(IF(MID(I16,ROW($1:$99),1)=".",ROW($1:$99)))

返回数组的最大值:14

这个公式的优点是简短，相对容易理解，并且不需要任何唯一的字符。

缺点是需要使用Ctrl+Shift+Enter和字符串长度的限制。这可以通过如下所示的变化来解决，但该变化使用OFFSET()函数，这是一个volatile(读取:slow)函数。

不知道这个公式的速度是多少。

变化:

=MAX((MID(A1,ROW(OFFSET($A$1,,,LEN(A1))),1)=".")*ROW(OFFSET($A$1,,,LEN(A1)))) works the same way, but you don't have to worry about the length of the string

=SMALL(IF(MID(A1,ROW($1:$99),1)=".",ROW($1:$99)),2) determines the 2nd occurrence of the match

=LARGE(IF(MID(A1,ROW($1:$99),1)=".",ROW($1:$99)),2) determines the 2nd-to-last occurrence of the match

=MAX(IF(MID(I16,ROW($1:$99),2)=".t",ROW($1:$99))) matches a 2-character string **Make sure you change the last argument of the MID() function to the number of characters in the string you wish to match!

如何创建一个自定义函数并在您的公式中使用它?VBA有一个内置的函数，InStrRev，它所做的正是您正在寻找的。

把这个放到一个新模块中:

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

你的函数看起来像这样(假设原始字符串在B1中):

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

您可以使用我创建的这个函数来查找字符串中的字符串的最后一个实例。

当然，公认的Excel公式是可行的，但它太难以阅读和使用。在某种程度上，你必须把它分解成更小的块，这样它才可维护。下面的函数是可读的，但这无关紧要，因为您在使用命名参数的公式中调用它。这使得使用它很简单。

Public Function FindLastCharOccurence(fromText As String, searchChar As String) As Integer
Dim lastOccur As Integer
lastOccur = -1
Dim i As Integer
i = 0
For i = Len(fromText) To 1 Step -1
    If Mid(fromText, i, 1) = searchChar Then
        lastOccur = i
        Exit For
    End If
Next i

FindLastCharOccurence = lastOccur
End Function

我是这样使用的:

=RIGHT(A2, LEN(A2) - FindLastCharOccurence(A2, "\"))

在VBA中一个简单的方法是:

YourText = "c:\excel\text.txt"
xString = Mid(YourText, 2 + Len(YourText) - InStr(StrReverse(YourText), "\" ))

单元格A1 =查找/the/position/的/最后一个斜杠

简单的方法是反转文本，然后找到第一个斜杠。现在你可以得到全文的长度减去这个数字。

像这样:

=LEN（A1）-FIND（“/”，REVERSETEXT（A1），1）+1

返回最后一个/的位置21

在新版本的Excel(2013年及以上)中，闪光填充可能是一个简单而快速的解决方案:在Excel中使用闪光填充 ．