下载安卓APP箭头
箭头给我发消息

客服QQ:3315713922

在excel中用数字就可以代替文字输入,你会么?

作者:课课家教育     来源: http://www.kokojia.com点击数:6538发布时间: 2016-06-16 16:19:33

标签: excel数字excel代码office

  我们在利用excel录入数据往往会感觉很麻烦,特别是录入信息非常多的时候,特别厌倦,有时候,有没有想砸键盘的感觉?有是正常的,这时候你就会想起需要进行快捷方法的学习了,寻找快捷的输入途径是你现在需要做的事情,本文将为大家举例如何使用数字来代替文本就可以轻松的完成数据的输入,想要学习的你赶紧来看看吧!

  我们看看下面的一个实例:这是一个“丰南一中职称统计登记表”见下图所示,其中“编号”、“姓名”都已录入完成,我们只需填入相应的“职称”和“所属部门”。假如“职称”分为中学高级、中学一级、中学二级和员级,“所属部门”分高一年级、高二年级、高三年级和其他,很多朋友会想,一个个的输入重复性的汉子真的是非常的麻烦,必须要找到快捷的输入方法,其实我们可以用数字来代替文字输入,意思是说,当你定义好数字代表的文字的时候,在输入数据的时候,只需要输入数字就可以马上显示文本,这样就很方便了,怎么操作,我们看看具体的操作方法:

  1.工作表的建立:首先先建立一个工作表,注意字段的顺序很重要,它涉及到第二步的操作,如下图所示:

新建一个工作表

  2.写入基本代码

  依次找到“工具→宏→VisualBasic编辑器”,在左边的资源管理器窗口双击Sheet1(Sheet1),在右侧的代码窗口中分别选择Worksheet对象和Change事件,然后按照图中所示的代码,输入进去。注意大小小的区分,不然很容易出错!

输入代码

  这些代码看起来都很简单,但有些不懂编程的朋友,小编将为大家进行简单的解释一下:

  ⑴在这段代码中咱们选择的Worksheet和Change分别代码当前工作表和改变事件,意思是说当前工作表中单元格中的值发生改变时要做什么;

  ⑵代码中Target.Column=3用于指定只能在第三列输入这些数据时才有效(如果不指定对整个工作表都有效);

  ⑶在代码中用到了If…EndIf语句,表示“如果…那么”,Target.Value则表示输入单元格的值。

  大家对上面的代码都应该比较清楚了吧,如果还不了解,那么你先按照这样输入进去,这样你看看结果,再对比一下代码,慢慢研究你或者会知道了。

  3.实现数字代替文本输入

  关闭代码编辑器,然后返回到Excel窗口,这时在第3列也就是“职称”输入刚才你设置的数字代码,试一试,你就会看到输入数字就会显示文本了,是否觉得代码的力量很神奇呢?看到下图所示:

最终的数字代替文字输入的效果

  有比较爱动脑筋的朋友会想,我先输入这些数字,然后用查找替换的方法不也行吗?这个方法你会发现,用查找替换操作容易将其他列中的这些数据错误地替换掉,如果每个数字经确认后再替换就会很麻烦的,而用代码就可以解决的问题,你为什么不用呢?

  4.修改代码再推广设置

  如果你对第三步的理解都清楚了,相信你也可以对第四列即“所属部门”进行设置吧?很简单,只需修改一小部分代码即可,最后的代码形式我们看到下图所示:

代码的延伸设置

  小结:用数字代替文本的输入,是为了寻找快捷输入方式的途径之一,这里是需要一定的代码阅读能力,以及简单的编程能力,如果编程能力一般般的朋友们,就需要认真再认真的阅读基本代码啦!实在不会的朋友,没办法,照抄吧!

赞(15)
踩(5)
分享到:
华为认证网络工程师 HCIE直播课视频教程