今天为大家分享excel中使用vba制作一个恶作剧小程序方法，很不错，值得大家学习，推荐过来，一起来学习吧!
　　步骤
　　1、首先我们打开一个工作样表作为例子。
　　2、使用alt+f11组合快捷键进入vbe编辑器，插入一个新模块，并在模块中输入以下代码：
　　Option Explicit
　　Sub 恶作剧()
　　Dim Num%
　　Num = InputBox(＂选择1-5任意一个数字测试你的性格＂)
　　MsgBox (Choose(Num， ＂宅＂， ＂腐＂， ＂妖＂， ＂艳＂， ＂man＂))
　　End Sub
　　3、我们声明了一个变量Num为整数型，并将其赋值为输入值，并且提示是输入1-5之间任意一个数字。
　　4、然后在选取之后，我们使用msgbox将其结果显示出来，这里我们使用choose函数来做选择，并给出对应的1-5的选项。
　　5、这里我们没有对输入的数字进行验证，如果输入小于1，或者是大于5的数字，那么choose函数会因为数字下标超出而报错。
　　6、所以我们必须对Num变量的输入值进行一个限制，限制的方法可以使用if函数对Num变量值进行判断，如果出现错误则显示错误并且退出过程。
　　If Num < 1 Or Num > 5 Then MsgBox (＂输入错误＂)
　　If Num < 1 Or Num > 5 Then Exit Sub
　　以上就是excel vba编程制作一个恶作剧小程序方法介绍，操作很简单的，大家学会了吗?希望能对大家有所帮助!

汉斯顿纯水机好不好汉斯顿纯水机优势有哪些详解中国的饮水质量虽然是符合国家标准，但是却不能像香港，台湾等地方的水一样能够直接饮用，中国的水只能是烧开了后才能喝的。而且现在中国的水污染越来越严重，有很多人都已经觉得饮水质量已经不汉斯顿直饮机有什么优点汉斯顿直饮机优点介绍图文为了能够让我们平时喝的水更干净，对我们的健康不会有害处，我们会购买很多的净水设备，比如说净水器和直饮机都是常用的净水设备，现在直饮机也非常的受欢迎，而在众多的直饮机品牌中，汉斯顿直汉斯顿新风系统特点汉斯顿新风系统价格决定因素详解哪个品牌的新风系统效果好而且性价比高是不少消费者会关注到的问题。随着安装新风系统的流行，新风系统的价格也就成为消费者关注的重点。为了帮助朋友们更好的了解这个问题，下面，小编就向您详法兰尼空气净化器怎么样法兰尼空气净化器特点介绍详解严重的雾霾问题让很多人都十分的头疼，不少人都担心长期吸收不好的空气会影响身体健康，如果长期处于受污染的环境中的话，确实会给我们的健康造成威胁，久而久之也会导致很多疾病的出现，所以，澳兰斯空气净化器效果怎么样澳兰斯空气净化器特点大家在买一种产品的时候往往会先去了解这个产品如何，只有大家觉得好才会去考虑购买，因此今天小编就来给大家介绍关于澳兰斯空气净化器效果的知识，这样大家了解之后就会考虑买不买这个品牌的产科沃斯空气净化器怎么样科沃斯空气净化器特点介绍雾霾深深地影响了我们的健康生活，连呼吸一口新鲜空气都成为了奢求。为了拯救大家，科沃斯公司推出全新的空气净化器，此款还是会动的空气净化器。那么科沃斯空气净化器怎么样呢？接下来，我们一空气净化器好什么牌子A。O。史密斯空净怎么样详细介绍随着供暖季节的来临，雾霾来势更加凶猛，而由此导致的空气污染，对呼吸道健康危害甚大。为了拥有一个干净的生活环境，空气净化器成为每个家庭的必备。不过，空气净化器什么牌子好？如何在诸多品华帝浴霸有哪些优势华帝浴霸的优势特点详解很多家庭都会选择华帝浴霸，不仅是因为它材质结实耐用，还因为它具有自然的美感。采用天然华帝浴霸制作而成的台面价格较为昂贵，所以人造华帝浴霸就成了很多家庭的，下面小编为大家介绍华帝浴霸华帝浴霸有什么特点华帝浴霸优势特点介绍很多家庭都会选择华帝浴霸，不仅是因为它材质结实耐用，还因为它具有自然的美感。采用天然华帝浴霸制作而成的台面价格较为昂贵，所以人造华帝浴霸就成了很多家庭的，下面小编为大家介绍华帝浴霸华帝浴霸好不好华帝浴霸好优势介绍详解卫浴间已成为人们生活沐浴的重点，而浴霸又是使用频率的。晚饭后沐浴是大家使用浴霸最常见的，故选用一个好的华帝浴霸品牌是有必要的，对每个家庭来说浴霸的选择都是非常重要的，今天为大家推荐华帝浴霸好不好华帝浴霸品牌推荐详细介绍如果你留心的话，即使你没有接触过浴霸这个行业，你也会了解华帝这个品牌。因为在街上它们店铺的设计是十分吸引眼球的，即使是黑色的，但却很抓眼球。不知道大家注意到了没有呢？那么事实上的华