1、=MAX((MID(A1,ROW($A:$A),1)=A)*ROW($A:$A)) 该公式需要使用数组:Ctrl+shift+enter 2、=LOOKUP(1,0/(MID(A1,COLUMN(1:1),1)=A),COLUMN(1:1)) 3、VBA自定义函数 Alt+F11打开VBA运行框 插入模块 复制如下代码到代码框内 在该sheet内即可使用函数lastC函数,内部包含两个参数,字符串和查找的字符。 Function LastC(myRange As Range, myC As String)If myRange = Or Len(myC) 1 ThenLastC = 参数错误Exit FunctionEnd IfLastC = 未包含该字符Dim i As SingleFor i = 1 To Len(myRange)If Mid(myRange, i, 1) = myC Or Mid(myRange, i, 1) = UCase(myC) Or Mid(myRange, i, 1) = LCase(myC) ThenLastC = iEnd IfNextEnd Function