帖子: 9
主題: 2
精華: 0
積分: 16
點名: 0
作業系統: window xp
軟體版本: office 2007
閱讀權限: 10
性別: 男
來自: taiwan
註冊時間: 2011-6-11
最後登錄: 2020-7-21

1^# 跳轉到 » 倒序看帖

字體大小: tT

發表於 2011-6-29 15:09 | 只看該作者

VLOOKUP的問題

想請問一下如何在使用VBA的VLOOKUP，因為測試了很多但是抓的值都是錯誤，但又不知道哪裡錯誤，有沒有人可以幫我解釋一下

程式碼如下：

Sub V式抓值()

Dim x As Integer
Dim y As String
Dim z As String
1
z = 2
y = Worksheets("Sheet1").Range("A" & z).Value
Range("B2").Value = Application.VLookup(y, Sheet2.[A1:B100], 2)

End Sub

麻煩了！>"<

Book1.rar (12.15 KB)

oobird

　頭銜: 街友一族

超級版主 Rank: 8 Rank: 8

帖子: 1572
主題: 16
精華: 2
積分: 1521
點名: 0
作業系統: xp
軟體版本: office 2003
閱讀權限: 150
性別: 男
註冊時間: 2010-5-1
最後登錄: 2016-1-13

論壇貢獻勳章

2^#

發表於 2011-6-29 16:04 | 只看該作者

沒下附件，不過看你的代碼，vlookup少了一個參數
Application.VLookup(y, Sheet2.[A1:B100], 2,0)

TOP

sang520

小學生 Rank: 1

帖子: 9
主題: 2
精華: 0
積分: 16
點名: 0
作業系統: window xp
軟體版本: office 2007
閱讀權限: 10
性別: 男
來自: taiwan
註冊時間: 2011-6-11
最後登錄: 2020-7-21

3^#

發表於 2011-6-29 20:49 | 只看該作者

疑~我附件有上傳成功啊！在我發言的最下方，您這邊看不到嗎?
不過我剛剛有修改了一下，將您說的參數放進去，但還是沒辦法ㄋ
在B2的這格還是顯是#N/A，我有用函數去試試看，若出現#N/A不是沒抓到值，
而是最開始的『y』這個值沒有抓到的意思，但是應該是有抓到啊！這個問題我一直很納悶~"~

P.S. 小弟最近才第一次發帖發問，沒經驗若造成您的不便真的很抱歉。

TOP

a8350070

中學生 Rank: 2

帖子: 48
主題: 2
精華: 0
積分: 64
點名: 0
作業系統: xp
軟體版本: office 2000
閱讀權限: 20
性別: 男
來自: TAIPEI
註冊時間: 2011-4-16
最後登錄: 2018-9-26

4^#

發表於 2011-6-29 20:52 | 只看該作者

小學生沒法下載附件,不過看看是否這裡出問題先

y = Worksheets("Sheet1").Range("A"& z).Value

My Blog
http://blog.xuite.net/a8350070

TOP

oobird

　頭銜: 街友一族

超級版主 Rank: 8 Rank: 8

帖子: 1572
主題: 16
精華: 2
積分: 1521
點名: 0
作業系統: xp
軟體版本: office 2003
閱讀權限: 150
性別: 男
註冊時間: 2010-5-1
最後登錄: 2016-1-13

論壇貢獻勳章

5^#

發表於 2011-6-29 22:41 | 只看該作者

Dim x As Long
Dim y As Long
Dim z As Long

TOP

sang520

小學生 Rank: 1

帖子: 9
主題: 2
精華: 0
積分: 16
點名: 0
作業系統: window xp
軟體版本: office 2007
閱讀權限: 10
性別: 男
來自: taiwan
註冊時間: 2011-6-11
最後登錄: 2020-7-21

6^#

發表於 2011-6-30 01:39 | 只看該作者

哈哈！謝謝a8350070 幫我尋找錯誤，也謝謝oobird的耐心解答，偶經過測試真的抓到值了！
超開心的，但是有個疑問，當宣告時為何不能使用string反而用long才行？那此兩個使用的方式
為何?那Long所代表的意思是什麼呢？能否教導一下，謝謝！
實在感謝以上幫忙我解答的前輩們，謝謝！

TOP

oobird

　頭銜: 街友一族

超級版主 Rank: 8 Rank: 8

帖子: 1572
主題: 16
精華: 2
積分: 1521
點名: 0
作業系統: xp
軟體版本: office 2003
閱讀權限: 150
性別: 男
註冊時間: 2010-5-1
最後登錄: 2016-1-13

論壇貢獻勳章

7^#

發表於 2011-6-30 10:22 | 只看該作者

你把y定義為String
y=值就是字符"100006"，而為是數字100006
在表二中只有數字10006，找不到"100006"的字符
所以只能用數字類型
Long所代表的意思是什麼呢，最好是你自己找excel中的說明，才會有印象！

TOP

sang520

小學生 Rank: 1

帖子: 9
主題: 2
精華: 0
積分: 16
點名: 0
作業系統: window xp
軟體版本: office 2007
閱讀權限: 10
性別: 男
來自: taiwan
註冊時間: 2011-6-11
最後登錄: 2020-7-21

8^#

發表於 2011-6-30 10:23 | 只看該作者

本帖最後由 sang520 於 2011-6-30 11:26 編輯

我又遇到問題了！為什麼我把其他檔案的資料複製→貼上值到sheet2這個活頁
！程式碼都沒變，但是又抓不到了！是什麼問題啊????

Book1(增加資料筆數).rar (86.04 KB)

TOP

Hsieh

超級版主 Rank: 8 Rank: 8

帖子: 4901
主題: 44
精華: 24
積分: 4916
點名: 106
作業系統: Windows 7
軟體版本: Office 20xx
閱讀權限: 150
性別: 男
來自: 台北
註冊時間: 2010-4-30
最後登錄: 2024-5-8

2023年全勤獎章 2022虎年全勤獎章 2021牛年全勤獎章 2020鼠年全勤獎章 2019 豬年全勤獎章 2018 狗年全勤獎章 2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章 2013蛇年全勤獎章 2012龍年全勤獎章論壇貢獻勳章熱心公益勳章 2011兔年全勤獎章