大家好，雨雨來為大家解答以上問題，整人小程序視頻，整人小程序很多人還不知道，現在讓我們一起來看看吧！

【資料圖】

今天給大家分享一下在excel中用vba制作惡作劇小程序的方法。很好，值得學習。請大家推薦一下，一起學習！

步驟

1.首先我們打開一個工作樣表作為例子。

2.使用alt f11組合鍵進入vbe編輯器，插入一個新模塊，并在模塊中輸入以下代碼：

選項顯式

Sub惡作劇()

維度數量%

Num=InputBox("從1到5中選擇任意數字來測試您的角色")

MsgBox (Choose(Num，"宅"，"腐"，"妖"，"顏"，"人"))

末端接頭

3.我們聲明一個變量Num是一個整數，并將其賦為輸入值，提示是輸入1到5之間的任意數字。

4.然后，在選擇之后，我們使用msgbox來顯示結果。這里我們用choose函數進行選擇，給出相應的1-5個選項。

5.這里，我們不驗證輸入的數字。如果輸入的數字小于1或大于5，choose函數將報告錯誤，因為數字的下標超過了。

6.因此，我們必須限制Num變量的輸入值。限制方法可以使用if函數來判斷Num變量的值。如果有錯誤，它將顯示錯誤并退出進程。

如果數字1或數字5，則MsgBox("輸入錯誤")

如果數字1或數字5，則退出Sub

以上是excel vba編程制作惡作劇小程序的介紹。操作很簡單。你學會了嗎？希望能對大家有所幫助！

本文講解到此結束，希望對大家有所幫助。

標簽：

關鍵詞：