返回列表下一主題上一主題發帖

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

seim

小學生 Rank: 1

帖子: 6
主題: 1
精華: 0
積分: 7
點名: 0
作業系統: Vista
軟體版本: office 2010
閱讀權限: 10
註冊時間: 2014-6-28
最後登錄: 2017-1-8

1^# 跳轉到 » 倒序看帖

打印

字體大小: tT

發表於 2014-7-10 14:45 | 只看該作者

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

我想要使用 inputbox 取得某儲存格的行與列,

寫了下列的 VBA 的是一直出現錯誤, 請教大家問題點在那,

感謝幫忙.

Dim code As Range
Dim Code_Row As Integer
Dim Code_Column As Integer

code = Application.InputBox(prompt:="輸入 Code 欄位") '出現沒有設定物件變數或 with 區塊變數
If code = "" Then Exit Sub

Code_Row = code.Row
Code_Column = code.Column

ML089

版主 Rank: 7 Rank: 7 Rank: 7

帖子: 2025
主題: 13
精華: 0
積分: 2053
點名: 0
作業系統: WIN7
軟體版本: Office2007
閱讀權限: 100
性別: 男
來自: 台北市
註冊時間: 2011-3-2
最後登錄: 2024-3-14

論壇榮譽勳章論壇贊助勳章熱烈參與勳章 2014馬年全勤獎章 2015羊年全勤獎章 2016猴年全勤獎章

2^#

發表於 2014-7-10 16:08 | 只看該作者

回復 1# seim

code = Application.InputBox(prompt:="輸入 Code 欄位") '出現沒有設定物件變數或 with 區塊變數
If code = "" Then Exit Sub

code 是內定函數名稱，請勿使用，改個名字 code1 也可以

{...} 表示需要用 CTRL+SHIFT+ENTER 三鍵輸入公式

TOP

seim

小學生 Rank: 1

帖子: 6
主題: 1
精華: 0
積分: 7
點名: 0
作業系統: Vista
軟體版本: office 2010
閱讀權限: 10
註冊時間: 2014-6-28
最後登錄: 2017-1-8

3^#

發表於 2014-7-10 16:16 | 只看該作者

請問一下, 以後我如何知道那些是內定函數, 需要避開.

有表可以查詢嗎??

TOP

stillfish00

大學生 Rank: 4

帖子: 1018
主題: 15
精華: 0
積分: 1058
點名: 0
作業系統: win7 32bit
軟體版本: Office 2016 64-bit
閱讀權限: 50
性別: 男
來自: 桃園
註冊時間: 2012-5-9
最後登錄: 2022-9-28

4^#

發表於 2014-7-10 23:54 | 只看該作者

回復 1# seim
可查看Excel說明中Application.InputBox
沒指定參數Type時，預設對話方塊會傳回文字
但你 code = Application.InputBox(prompt:="輸入 Code 欄位")

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

TOP

c_c_lai