列出如下三种方法。1、2较为直接,但理解较难。
3操作稍显麻烦,但是易于理解且可作其它相关输出。
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