欢迎来到天天文库
浏览记录
ID:24217593
大小:50.50 KB
页数:4页
时间:2018-11-13
《excel用自定义函数倒读单元格文本》由会员上传分享,免费在线阅读,更多相关内容在学术论文-天天文库。
1、Excel用自定义函数倒读单元格文本 前些天收到朋友一个短信,将一段祝福的话倒序发了过来。虽然读起来挺费劲,但是却十分个性化。在这个短信的启发下,咱也想个性化一把,把写好的邮件也给倒过来,想来发出去必也有好的效果。不过,如果是倒序录入汉字的话,估计咱无论使用哪种输入法都不会有太高的效率,咱还是先按正常的顺序录入,再把它的次序给颠倒过来吧。 一、使用开发工具 原以为这事儿会挺简单,但忙活了半天也没什么结果,最后,还是在Excel中借助于自定义函数才使这个问题最终得到解决。解决的办法如下: 先在A1、A2单元格中按正常的顺序录入短信内容。点击功能区开发工具选项卡的代码功能组中的Vis
2、ualBasic按钮,打开VBA代码编辑窗口。如果您的Excel功能区中没有开发工具选项卡,那么可以点击左上角Office按钮,点击打开的对话框右下角的Excel选项按钮,在打开的对话框中,点击左侧的常用项目,并选中右侧在功能区显示开发工具选项卡复选项,这样就可以将开发工具选项卡添加到功能区中了。 在VBA代码编辑窗口中,点击菜单命令插入→模块,得到模块1编辑窗口,在其中输入如下自定义函数的代码,如图1所示。 Functiondaodu(dy) a=Len(dy) Fori=aTo1Step-1 b=Mid(dy,i,1) daodu=daodub Nex
3、ti EndFunction 图1VBA代码编辑窗口(点击看大图) 完成后,选择菜单文件→关闭并返回到MicrosoftExcel命令,返回到Excel工作表窗口。 现在,在B1单元格输入公式=daodu(A1),回车后就可以看到结果了。拖动B1单元格的填充句柄向下复制公式,则可以轻松地得到所需要的结果,如图2所示。 图2(点击看大图) 二、Excel中加载宏 函数Daodu是我们自定义的函数,它可以象Excel本身自带的函数一样使用。但是在默认的情况下它只能在当前工作薄使用。如果我们需要经常在其它工作薄中使用该函数,则点击Office按钮,在弹出的菜单中点击另存
4、为→其它格式命令,打开另存为对话框,在保存类型下拉列表中选择Excel加载宏,然后输入一个文件名,如daodu,如图3所示。单击确定后文件就被保存为加载宏。 图3Excel加载宏(点击看大图) 再点击Office按钮,点击右下角的Excel选项按钮,打开Excel选项对话框,点击左侧的加载项项目,然后右侧管理下拉列表中选择Excel加载项,单击其右侧的转到按钮。打开加载宏对话框,勾选可用加载宏列表框中的daodu复选框,如图4所示,单击确定按钮后,就可以在本机上的所有工作薄中使用该自定义函数了。 图4Excel中加载宏 如果您在这个对话框中看不到Daodu复选项,可以点
5、击浏览按钮查找。我们所保存的Daodu加载宏会保存在C:DocumentsandSettings用户名ApplicationDataMicrosoftAddIns文件夹中。如果我们想在其它的机器中使用此自定义函数,那么也需要将加载宏文件保存到其它机器中相应的文件夹中。——..,。
此文档下载收益归作者所有