怎樣在VBA中調用Vlookup函數(shù)?
單個查找的實現(xiàn)##
這個在網上花點功夫是可以找到相關的內容的,以下是蘭色幻想-趙志東的excel精英培訓公眾號里介紹的方法:
在VBA中調用工作表函數(shù)戏仓,可以用下面的格式
Application.工作表函數(shù)名(參數(shù)...)
如工作表中的函數(shù)
C1=Vlookup(C1,A1:A100,2,0)
在VBA代碼中就可以這樣調用
Range("C1")=Application.vlookup(range("C1"),range("A1:A100"),2,0)
但是這種查找只適用于單個單元格疚宇,對于批量查找又是怎樣實現(xiàn)呢?
批量向下查找##
請參照下面的做法赏殃。
首先是數(shù)據源:
圖中B7用函數(shù)Vlookup表示
B7=vlookup (A7,A1:B3,2,0)
在VBA中怎樣改寫?
我開始的思路是把代碼中的Range中用Cells的形式來表示:
Dim i
For i=7 to 9 step 1
Cells(i,2)=application.vlookup(cells(i,1),(cells(1,1):cells(3,2)),2,0)
next i
但事實表示這種調用是無效的敷待。最后也就是今天下午參加excel技能培訓的時候,突然靈光閃現(xiàn)仁热,想到了辦法榜揖。具體的解決方法是保留查找區(qū)域range的表達式。修改后的代碼如下:
這樣前面截圖上的點擊按鈕就可以實現(xiàn)批量查找了抗蠢。其它的函數(shù)用蘭色幻想提到的“Application.工作表函數(shù)名(參數(shù)...)”應該也可以調用举哟。下次有時間再測試一下。
以上就是我學習到的Vlookup函數(shù)在VBA中的運用迅矛。希望對大家有用妨猩。