返回列表 上一主題 發帖

[發問] Excel VBA 如何用 inputbox 取得儲存格的行與列

stillfish00

帖子
1018 
主題
15 
精華
0 
積分
1058 
點名
0  
作業系統
win7 32bit 
軟體版本
Office 2016 64-bit 
閱讀權限
50 
性別
男 
來自
桃園 
註冊時間
2012-5-9 
最後登錄
2022-9-28 
1# 跳轉到 »
發表於 2014-7-10 23:54 | 顯示全部帖子
回復 1# seim
可查看Excel說明中Application.InputBox
沒指定參數Type時，預設對話方塊會傳回文字
但你 code = Application.InputBox(prompt:="輸入 Code 欄位")

等號左式為Range物件，右式為文字，這樣會把該文字給到Range的value屬性(預設屬性)
但你的code這個Range又還沒被set(只有宣告而已)，所以才會出現"沒有設定物件變數"

TOP

stillfish00

帖子
1018 
主題
15 
精華
0 
積分
1058 
點名
0  
作業系統
win7 32bit 
軟體版本
Office 2016 64-bit 
閱讀權限
50 
性別
男 
來自
桃園 
註冊時間
2012-5-9 
最後登錄
2022-9-28 
2#
發表於 2014-7-11 08:08 | 顯示全部帖子
回復 5# c_c_lai
這樣是不會有Error，但是和發問的題意就不合了
我傾向於
  1. set code = ActiveSheet.Range(Application.InputBox(Prompt:="輸入 Code 欄位"))
複製代碼
或
  1. set code = Application.InputBox(Prompt:="請點選儲存格",Type:=8)
複製代碼
第二種 對話方塊 要用點選儲存格的方式輸入

當然，兩種可能都還要另外加一些防呆處理的程式碼

TOP

        靜思自在 : 欣賞別人就是莊嚴自己。
返回列表 上一主題