Excel VBA InputBox 資料輸入對話方塊使用教學與範例

文章推薦指數: 80 %
投票人數:10人

介紹如何在Excel 中使用VBA 的 InputBox 資料輸入對話方塊,建立視窗讓使用者輸入資料。

InputBox 資料輸入對話方塊. 在VBA 程式中如果需要要求使用者即時輸入資料, ... 跳至主要導覽跳至主要內容跳至主要資訊欄介紹如何在Excel中使用VBA的InputBox資料輸入對話方塊,建立視窗讓使用者輸入資料。

InputBox資料輸入對話方塊 在VBA程式中如果需要要求使用者即時輸入資料,可以使用InputBox建立一個對話方塊,讓使用者直接輸入: '建立資料輸入對話方塊,取得使用者輸入的資料 UserData=InputBox("請輸入資料:") '顯示輸入的資料 MsgBox"您輸入的資料是:"&UserData InputBox資料輸入對話方塊 在程式執行時就會跳出一個對話視窗,讓使用者輸入資料: InputBox資料輸入對話方塊 使用者輸入資料之後,VBA程式就可以取得輸入的內容: 輸入的內容 自訂對話方塊 InputBox其實還有許多可自訂的選項可用: InputBox(提示訊息,[標題],[預設值],[X座標],[Y座標]) 除了第一個提示訊息參數一定要指定之外,其餘的參數都是選填的。

以下是一個自訂對話方塊標題、預設值、位置的範例: '自訂對話方塊標題、預設值、位置 UserData=InputBox("請輸入資料:","使用者輸入","OfficeGuide",1500,500) 執行的結果會像這樣: 自訂對話方塊 判斷未輸入、取消輸入資料 如果需要判斷使用者是否有在InputBox中輸入資料,可以使用以下方式: UserData=InputBox("請輸入資料:") IfStrPtr(UserData)=0Then MsgBox"您取消輸入。

" ElseIfUserData=vbNullStringThen MsgBox"您沒有輸入資料。

" Else MsgBox"您輸入的資料是:"&UserData EndIf 這樣就可以清楚判斷出使用者按下「取消」、或是未輸入任何資料就按下「確定」的狀況。

Application.InputBox資料輸入對話方塊 資料輸入對話方塊除了一般的InputBox之外,還有另外一種Application.InputBox,兩者的功能與用法都非常相似,主要的小差異是Application.InputBox多了可以指定輸入資料類型的功能: InputBox(提示訊息,[標題],[預設值],[X座標],[Y座標],[Type:=類型代碼]) 以下是可用的類型代碼: 值 描述 0 公式 1 數字 2 文字(字串) 4 邏輯值(True或False) 8 儲存格參照,視為Range物件 16 錯誤值,例如#N/A 64 陣列值 假設我們想讓使用者只能輸入數字: '輸入數字 UserData=Application.InputBox("請輸入數字:",Type:=1) 如果使用者輸入的資料不是數字,就會出現這樣的提示訊息: 不正確的數字 選擇範圍、計算總和範例 以下是一個利用Application.InputBox讓使用者在Excel表格中選擇範圍,並計算範圍內所有數值總和的範例: DimrngAsRange DimcelAsRange DimsAsInteger '選擇範圍 Setrng=Application.InputBox("請選擇範圍:",Type:=8) '計算總和 s=0 ForEachcelInrng.Cells s=s+cel.Value Nextcel MsgBox"總和:"&s 執行時使用者可以直接以滑鼠選擇Excel儲存格範圍: 選擇儲存格範圍 選擇範圍之後,就會計算出數值總和: 數值總和 參考資料:Office官方網頁、Access-Excel 讀者互動方式 發佈留言取消回覆發佈留言必須填寫的電子郵件地址不會公開。

必填欄位標示為*留言*顯示名稱* 電子郵件地址* 個人網站網址 主要資訊欄搜尋 近期文章 Linux檢查、測試CPUAES-NI硬體加速加密指令集教學 CentOSLinux7.9自行編譯、安裝OpenSSH9.0p1伺服器教學與範例 Python使用zipfile模組壓縮、解壓縮ZIP檔案教學與範例 Python以LINENotify自動傳送即時訊息、圖片教學與範例 Linux使用Prometheus與Grafana監控伺服器狀態、發送告警Email簡訊教學與範例 Linux設定pam_tty_audit記錄SSH使用者操作指令教學與範例 Linux封鎖、解鎖登入失敗次數過多的帳號pam_faillock教學與範例 Python使用pytube自動下載YouTube影片教學與範例 推薦網站 Udemy線上教學課程 Coursera線上教學課程 關注本站 電子郵件Facebook 公益 家扶基金會 台灣世界展望會 Yahoo奇摩公益 igiving公益網 兒福聯盟



請為這篇文章評分?