一、使用开发工具 原以为这事儿会挺简单,但忙活了半天也没什么结果,最后,还是在Excel中借助于自定义函数才使这个问题最终得到解决。解决的办法如下: 先在A1、A2单元格中按正常的顺序录入短信内容。点击功能区“开发工具”选项卡的“代码”功能组中的“Visual Basic”按钮,打开VBA代码编辑窗口。如果您的Excel功能区中没有“开发工具”选项卡,那么可以点击左上角“Office”按钮,点击打开的对话框右下角的“Excel选项”按钮,在打开的对话框中,点击左侧的“常用”项目,并选中右侧“在功能区显示“开发工具”选项卡”复选项,这样就可以将“开发工具”选项卡添加到功能区中了。 在VBA代码编辑窗口中,点击菜单命令“插入→模块”,得到“模块1”编辑窗口, 在其中输入如下自定义函数的代码,如图1所示。 Function daodu(dy) a = Len(dy) For i = a To 1 Step -1 b = Mid(dy, i, 1) daodu = daodu & b Next i End Function