EXCEL 如何制作瀑布图,对于有些数据做图表非常适合用瀑布图,比如生活开支......
Excel中用VBA使数字代替长语句的输入(二)
前面的百度经验“Excel中用VBA使数字代替长语句的输入(一)”(http://jingyan.baidu.com/article/a948d6515a7b840a2dcd2e21.html)
我用 VBA来写一个小程序,实现在工作表“sheet1"的第一列(注意仅限第一列,其他列操作该命令无效)中输入“1”,就自动变为“大不列颠及北爱尔兰联合王国”;输入“2”,就自动变为“中华人民共和国”;输入“3”,就自动变为“美利坚合众国”。
下面来修改一下代码,以实现更多功能。
工具/原料
- P> Excel/P>
方法/步骤
目的一:不在工作表“sheet1"的第一列实现“数字代替长语句”的功能,而在第二列实现“数字代替长语句”的功能。
操作:只需将代码“If Target.Column = 1 Then” 中的“1”修改为“2”就行了,即改为“If Target.Column =2 Then”。
下图显示第一列没有“数字代替长语句”的功能,而第二列有“数字代替长语句”的功能。
目的二:在工作表“sheet1"的全表实现“数字代替长语句”的功能
操作:只需将代码“If Target.Column = 1 Then” 和一个“end if "删除即可
代码修改看下图:
在工作表“sheet1"的全表实现“数字代替长语句”的功能,效果见下图
目的三:在工作表“sheet1"的第一列实现“数字代替长语句”的功能,但我想加一条,用”4”,代表“朝鲜民主主义人民共和国”,代码修改见下图:
在工作表“sheet1"的第一列实现“数字代替长语句”的功能,但我想加一条,用”4”,代表“朝鲜民主主义人民共和国”,效果见下图:
目的四:实现在工作表“sheet1"的第一列(注意仅限第一列,其他列操作该命令无效)中输入“1”,就自动变为“小红”;输入“2”,就自动变为“小明”;输入“3”,就自动变为“小周”。代码修改见下图:
实现在工作表“sheet1"的第一列(注意仅限第一列,其他列操作该命令无效)中输入“1”,就自动变为“小红”;输入“2”,就自动变为“小明”;输入“3”,就自动变为“小周”。效果见下图:
就写这么多了
其他功能以后补充。
以上方法由办公区教程网编辑摘抄自百度经验可供大家参考!