excel vba編程制作一個(gè)惡作劇小程序
我要評(píng)論今天小編為大家分享excel中使用vba制作一個(gè)惡作劇小程序方法，很不錯(cuò)，值得大家學(xué)習(xí)，推薦過來，一起來學(xué)習(xí)吧！
Excel2003綠色版 EXCEL2003精簡(jiǎn)綠色版 (附excel2003綠色工具)
- 類型：辦公軟件
- 大?。?/span>13.3MB
- 語言：簡(jiǎn)體中文
- 時(shí)間：2012-06-19
步驟
1、首先我們打開一個(gè)工作樣表作為例子。
2、使用alt+f11組合快捷鍵進(jìn)入vbe編輯器，插入一個(gè)新模塊，并在模塊中輸入以下代碼：
Option Explicit
Sub 惡作劇()
Dim Num%
Num = InputBox("選擇1-5任意一個(gè)數(shù)字測(cè)試你的性格")
MsgBox (Choose(Num, "宅", "腐", "妖", "艷", "man"))
End Sub
3、我們聲明了一個(gè)變量Num為整數(shù)型，并將其賦值為輸入值，并且提示是輸入1-5之間任意一個(gè)數(shù)字。
4、然后在選取之后，我們使用msgbox將其結(jié)果顯示出來，這里我們使用choose函數(shù)來做選擇，并給出對(duì)應(yīng)的1-5的選項(xiàng)。
5、這里我們沒有對(duì)輸入的數(shù)字進(jìn)行驗(yàn)證，如果輸入小于1，或者是大于5的數(shù)字，那么choose函數(shù)會(huì)因?yàn)閿?shù)字下標(biāo)超出而報(bào)錯(cuò)。
6、所以我們必須對(duì)Num變量的輸入值進(jìn)行一個(gè)限制，限制的方法可以使用if函數(shù)對(duì)Num變量值進(jìn)行判斷，如果出現(xiàn)錯(cuò)誤則顯示錯(cuò)誤并且退出過程。
If Num < 1 Or Num > 5 Then MsgBox ("輸入錯(cuò)誤")
If Num < 1 Or Num > 5 Then Exit Sub
以上就是excel vba編程制作一個(gè)惡作劇小程序方法介紹，操作很簡(jiǎn)單的，大家學(xué)會(huì)了嗎？希望能對(duì)大家有所幫助！
相關(guān)文章
陽歷/農(nóng)歷轉(zhuǎn)換對(duì)照表怎么做? Excel制作日歷表/萬年歷的最終版
想要制作陽歷/農(nóng)歷轉(zhuǎn)換對(duì)照表，，通過這個(gè)對(duì)照表，你只需知道陽歷日期，就可以快速準(zhǔn)確的找到對(duì)應(yīng)的農(nóng)歷日期，下面我們就來看看詳細(xì)制作方法2025-04-10三分鐘就搞定! Excel快速制作一個(gè)日歷表/萬年歷的技巧
工作上需要制作一個(gè)日歷表/萬年歷，該怎么制作呢？我們需要使用三個(gè)excel函數(shù)來實(shí)現(xiàn)，詳細(xì)請(qǐng)看下文介紹2025-04-10這個(gè)函數(shù)公式簡(jiǎn)直太強(qiáng)了! excel按權(quán)重求和計(jì)算的技巧
Excel中有一個(gè)功能非常強(qiáng)大的函數(shù)，它就是SUMPRODUCT函數(shù)，既能求和、計(jì)數(shù)、權(quán)重計(jì)算，還能排名等，今天我們就來看看Excel根據(jù)權(quán)重求和的技巧2025-04-10tocol函數(shù)哪個(gè)版本能用? excel中tocol函數(shù)的兩種高級(jí)用法
TOCOL函數(shù)公式非常強(qiáng)大，值得一學(xué)，從字面意義可以理解出來，它是將數(shù)據(jù)轉(zhuǎn)換成一列的，今天分享TOCOL函數(shù)的2種高級(jí)用法2025-04-10Excel隱藏行和折疊行有什么不同? 隱藏行和折疊使用方法和區(qū)別介紹
excel表格進(jìn)行操作的時(shí)候，發(fā)現(xiàn)有隱藏和和折疊行，看上去效果一樣，都隱藏了，但是兩者是有很大區(qū)別的，詳細(xì)請(qǐng)看下文介紹2025-03-21Excel工齡計(jì)算不再愁! Excel隱藏函數(shù)DATEDIF輕松計(jì)算精確到天級(jí)的工齡
在日常工作中，我們經(jīng)常需要計(jì)算員工的工齡，以便進(jìn)行人事管理、薪資調(diào)整等工作，本文將詳細(xì)介紹如何在Excel表格中計(jì)算工齡，并提供多種實(shí)用方法供您選擇2025-03-13快速提高工作效率! Excel高手的8個(gè)技巧勸你學(xué)學(xué)
Excel數(shù)據(jù)處理遇到的問題，99%都是由于奇葩的數(shù)據(jù)格式造成的，今天跟大家整理了幾個(gè)Excel表格構(gòu)建的規(guī)則,先不要問為什么，照著做就對(duì)了2025-03-06Excel透視表1月到12月不能排序怎么辦? 數(shù)據(jù)透視表日期無法排序解決方法
如圖對(duì)數(shù)據(jù)透視表日期進(jìn)行升序排序后，仍不是我們想要的結(jié)果，有可能月份是文本，不能排列，下面我們就來看看詳細(xì)解決辦法2025-03-06財(cái)務(wù)審計(jì)必會(huì)! 2分鐘搞定用excel做賬齡劃分的技巧
首先咱們得明確一下賬齡的概念，簡(jiǎn)單來說，賬齡就是某個(gè)賬戶的余額從產(chǎn)生到現(xiàn)在的時(shí)間長(zhǎng)度，比如，一年以內(nèi)的賬齡就是那些在過去一年內(nèi)產(chǎn)生的債權(quán)或債務(wù)，下面我們就來看看2025-03-06
實(shí)現(xiàn)辦公自動(dòng)化! DeepSeek搭配Excel制作自定義按鈕的技巧
DeepSeek生成想要的代碼很方便，如果將生成的代碼放到excel中作為vba代碼使用，豈不是能實(shí)現(xiàn)辦公自動(dòng)化？下面我們就來看看實(shí)現(xiàn)方法2025-03-05
