前几天收到朋友的一条短信，发的顺序倒过来。虽然很难读，但是很有个性。受到这条短信的启发，我也想把它个性化，把写好的邮件“反转”。如果我想发出去，会有很好的效果。但是如果汉字是倒序输入的话，估计无论我们用哪种输入法，效率都不会太高。我们先按正常顺序输入，然后颠倒顺序。
一、使用开发工具
原以为这事儿会挺简单，但忙活了半天也没什么结果，最后，还是在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
图1 VBA代码编辑窗口
完成后，选择菜单“文件→关闭并返回到Microsoft Excel”命令，返回到Excel工作表窗口。
现在，在B1单元格输入公式“=daodu(A1)”，回车后就可以看到结果了。拖动B1单元格的填充句柄向下复制公式，则可以轻松地得到所需要的结果，如图2所示。
图2
上一页12 下一页
版权声明：本文内容由互联网用户自发贡献，该文观点仅代表作者本人。本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌抄袭侵权/违法违规的内容， 请发送邮件至 86345@qq.com 举报，一经查实，本站将立刻删除。