需要用一个自定义函数 在EXCEL窗口中按ALT+F11组合键,调出VBA窗口,在VBA窗口中按菜单栏上的“插入-模块”,会在当前窗口中插入一个空白的模块,把下面代码粘贴进去,然后回到EXCEL窗口,在A1单元格中输入1234567,在B1单元格中输入公式 =abc(a1) 就能得到你想要的结果了. Function abc(a As Range) Application.Volatile abc = Left(a,1) For i = Len(a) To 2 Step -1 abc = abc & Mid(a,i,1) Next End Function