Board logo

標題: 如何在VBA中使用VLOOKUP [打印本頁]
作者: enoch    時間: 2012-5-23 11:51     標題: 如何在VBA中使用VLOOKUP

請問在VBA 內, 如何使用VLOOKUP函數
例如在工作表內= vlookup(a1,data,3,false) 在巨集應該如何修改
需要在前面加上Application.worksheetfunction 嗎?
請指教
作者: register313    時間: 2012-5-23 12:15

回復 1# enoch

vba內要使用工作表函數,須在工作表函數前加 Application.WorksheetFunction (或Application)
  1. Sub XX()
  2. Dim data As Range
  3. Set data = [d1:f10]
  4. [b1] = Application.WorksheetFunction.VLookup([a1], data, 3, 0)
  5. End Sub
複製代碼
作者: man65boy    時間: 2012-5-24 21:30

回復 2# register313

請教大大，如果以此題目，不使用按鈕，如何輸入後立即更新，感謝撥冗指導!
作者: register313    時間: 2012-5-24 21:37

回復 3# man65boy

工作表模組
  1. Private Sub WORKSHEET_CHANGE(ByVal TARGET As Range)
  2. Dim data As Range
  3. Set data = [d1:f10]
  4. If TARGET.Address = "$A$1" Then [b1] = Application.WorksheetFunction.VLookup([a1], data, 3, 0)
  5. End Sub
複製代碼
作者: man65boy    時間: 2012-5-24 22:34

回復 4# register313


    收到~學習了，謝謝!
作者: enoch    時間: 2012-5-26 11:58

我都學會了, 謝謝



歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)