EXCEL 如何制作瀑布图,对于有些数据做图表非常适合用瀑布图,比如生活开支......
excel中使用vba制作一个恶作剧小程序
来源:互联网
2023-02-20 23:45:54 315
excel中使用vba制作一个恶作剧小程序
工具/原料
- excel2013
- 更多经验请关注,如果帮到了你,请在上方给个投票谢谢支持。 好人一生平安。
- 先顶后看年薪百万,如果帮到了你,帮忙给个好评,这对小编很重要,万分感谢。
方法/步骤
首先我们打开一个工作样表作为例子。
使用alt f11组合快捷键进入vbe编辑器,插入一个新模块,并在模块中输入以下代码:
Option Explicit
Sub 恶作剧()
Dim Num%
Num = InputBox("选择1-5任意一个数字测试你的性格")
MsgBox (Choose(Num, "宅", "腐", "妖", "艳", "man"))
End Sub
我们声明了一个变量Num为整数型,并将其赋值为输入值,并且提示是输入1-5之间任意一个数字。
然后在选取之后,我们使用msgbox将其结果显示出来,这里我们使用choose函数来做选择,并给出对应的1-5的选项。
这里我们没有对输入的数字进行验证,如果输入小于1,或者是大于5的数字,那么choose函数会因为数字下标超出而报错。
所以我们必须对Num变量的输入值进行一个限制,限制的方法可以使用if函数对Num变量值进行判断,如果出现错误则显示错误并且退出过程。
If Num 1 Or Num > 5 Then MsgBox ("输入错误")
If Num 1 Or Num > 5 Then Exit Sub
注意事项
- 谢谢你的投票。
- 你的投票是我编辑经验的动力。谢谢你。
以上方法由办公区教程网编辑摘抄自百度经验可供大家参考!
上一篇:excel2007快速入门 下一篇:Excel: 保护数据简易方法