excel如何使用vba编程制作一个恶作剧小程序
今天为大家分享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 5 Then MsgBox ("输入错误")
If Num 5 Then Exit Sub
以上就是excel vba编程制作一个恶作剧小程序方法介绍，操作很简单的，大家学会了吗?希望能对大家有所帮助!
推荐系统
雨林木风 winxp下载 纯净版 永久激活 winxp ghost系统 sp3 系统下载
64位系统大小：0MB系统类型：WinXP雨林木风在系统方面技术积累雄厚深耕多年，打造了国内重装系统行业知名品牌，雨林木风WindowsXP其系统口碑得到许多人认可，积累了广大的用户群体，是一款稳定流畅的系统，雨林木风 winxp下载 纯净版 永久激活 winxp ghost系统 sp3 系统下载，有需要的朋友速度下载吧。
系统等级：进入下载 >萝卜家园win7纯净版 ghost系统下载 x64 联想电脑专用
64位系统大小：0MB系统类型：Win7萝卜家园win7纯净版是款非常纯净的win7系统，此版本优化更新了大量的驱动，帮助用户们进行舒适的使用，更加的适合家庭办公的使用，方便用户，有需要的用户们快来下载安装吧。
系统等级：进入下载 >雨林木风xp系统 xp系统纯净版 winXP ghost xp sp3 纯净版系统下载
64位系统大小：1.01GB系统类型：WinXP雨林木风xp系统 xp系统纯净版 winXP ghost xp sp3 纯净版系统下载，雨林木风WinXP系统技术积累雄厚深耕多年，采用了新的系统功能和硬件驱动，可以更好的发挥系统的性能，优化了系统、驱动对硬件的加速，加固了系统安全策略，运行环境安全可靠稳定。
系统等级：进入下载 >萝卜家园win10企业版 免激活密钥 激活工具 V2023 X64位系统下载
64位系统大小：0MB系统类型：Win10萝卜家园在系统方面技术积累雄厚深耕多年，打造了国内重装系统行业的萝卜家园品牌，(win10企业版,win10 ghost,win10镜像),萝卜家园win10企业版 免激活密钥 激活工具 ghost镜像 X64位系统下载,其系统口碑得到许多人认可，积累了广大的用户群体，萝卜家园win10纯净版是一款稳定流畅的系统,一直以来都以用户为中心，是由萝卜家园win10团队推出的萝卜家园
系统等级：进入下载 >萝卜家园windows10游戏版 win10游戏专业版 V2023 X64位系统下载
64位系统大小：0MB系统类型：Win10萝卜家园windows10游戏版 win10游戏专业版 ghost X64位 系统下载，萝卜家园在系统方面技术积累雄厚深耕多年，打造了国内重装系统行业的萝卜家园品牌，其系统口碑得到许多人认可，积累了广大的用户群体，萝卜家园win10纯净版是一款稳定流畅的系统,一直以来都以用户为中心，是由萝卜家园win10团队推出的萝卜家园win10国内镜像版，基于国内用户的习惯，做
系统等级：进入下载 >windows11下载 萝卜家园win11专业版 X64位 V2023官网下载
64位系统大小：0MB系统类型：Win11萝卜家园在系统方面技术积累雄厚深耕多年，windows11下载 萝卜家园win11专业版 X64位 官网正式版可以更好的发挥系统的性能，优化了系统、驱动对硬件的加速，使得软件在WINDOWS11系统中运行得更加流畅，加固了系统安全策略，WINDOWS11系统在家用办公上跑分表现都是非常优秀，完美的兼容各种硬件和软件，运行环境安全可靠稳定。
系统等级：进入下载 >
热门系统
- 1微软最新版win10 LTSC X64位 纯净版系统 windows10 LTSC 系统下载
系统大小：4.4GB系统类型：Win10 - 2雨林木风Win11游戏版系统下载 windows11 64位游戏专用版本V2021
系统大小：4.38GB系统类型：Win11 - 3微软Win11系统 64位 正式版Ghost Windows11镜像 2022.05
系统大小：4.55GB系统类型：Win11 - 4深度技术 Windows7 纯净版64位下载 v2021.09
系统大小：3.9GB系统类型：Win7 - 5大地系统 Win11精简稳定版 GHOST镜像 X64位 V2022.06下载
系统大小：4.7GB系统类型：Win11
推荐软件
热门文章
常用系统
- 1windows10企业版下载 深度技术x86 永久免费下载 ghost iso镜像
系统大小：0MB系统类型：Win10 - 2WINDOWS10专业版 深度技术 iso ghost镜像 X64位 V2022.05下载
系统大小：4.75GB系统类型：Win10 - 3电脑公司win11专业电竞版 x64位游戏版下载 笔记本专用 GHOST镜像下载
系统大小：0MB系统类型：Win11 - 4windows11企业版下载 深度技术系统x64位 永久免费 ghost系统下载
系统大小：4.68GB系统类型：Win11 - 5Windows7纯净版下载 深度技术x64万能版 笔记本专用下载 免激活工具
系统大小：0MB系统类型：Win7 - 6深度技术win11娱乐版 X64位最新版下载 ISO镜像 华硕电脑专用下载
系统大小：4.68GB系统类型：Win11 - 7最新win10系统稳定版下载 雨林木风 x64位永久激活 v2023
系统大小：5.22GB系统类型：Win10 - 8系统之家纯净版win7系统 x64位精简版下载 win7激活密钥 官网镜像下载
系统大小：0MB系统类型：Win7 - 9番茄花园64位全新版 win7稳定版下载 永久免费 联想笔记本专用下载
系统大小：0MB系统类型：Win7
渝公网安备50010702505324号