錦子老師

黃霑：「錦子老師，我想要在Excel中設計一個可以讓使用者輸入資料的對話方塊，但同時判斷使用者是否在對話方塊有輸入資料或取消輸入。謝謝！」

錦子老師：「這個需求可以使用INPUTBOX來建立一個對話方塊，供使用者輸入資料。」

按ALT+F11鍵啟動VBA視窗。

點取「插入 > 模組」指令，新增Module1模組。

輸入下列程序

Sub TEXT()

UserData = InputBox("請輸入資料：")

If StrPtr(UserData) = 0 Then

MsgBox "您取消輸入。"

ElseIf UserData = vbNullString Then

MsgBox "您沒有輸入資料。"

Else

MsgBox "您輸入的資料是：" & UserData

End If

End Sub

按F5鍵或是點取「執行 > 執行SUB或USERFORM」指令，就會在Excel活頁簿視窗指定位置跳出一個對話視窗，讓使用者輸入資料：

使用者輸入完資料後，按「確定」鈕，VBA程序就可以取得輸入的內容顯示出來：

點取「確定」鈕。

以上就是今天主要學習的知識點，希望對大家有所幫助~~有什麼問題歡迎留言，我會儘量及時的給大家答覆~~

更多相關影片教學：請點我

部落格相關範例