2015-02-23 28 views
1

我想創建一個發票腳本,可以根據用戶窗體中的條目執行vlookup。我有一個用戶窗體,它有一個命名範圍的組合框。我想要四個文本框,其中顯示了vlookup的結果。 我有一個vlookup設置,它只是進入工作表中的正常單元格。它是:如何從用戶表單執行VB查找

=VLOOKUP($A22,Products!$A$1:$B$1679,2,FALSE) 

我想它,這樣而不是找小區A22,它執行從組合框,這僅僅是名爲test的VLOOKUP。然後我想重複它:

=VLOOKUP($A47,Products!$A$2:$A$1679,1,FALSE) 

=VLOOKUP($A47,Products!$A$2:$A$1679,1,FALSE) 

    =VLOOKUP($A47,Products!$A$2:$C$1679,3,FALSE) 

感謝您的閱讀,並且我希望您能提供幫助。如果你能

回答

2

參考ComboBox控件的.Value財產,僞代碼:

=VLOOKUP(UserForm1.ComboBox1.Value,Products!$A$2:$A$1679,1,FALSE) 

等等

實際代碼:

Dim lookupRange as Range 
Set lookupRange = Worksheets("Products").Range("A2:A1679") 

Product = Application.Vlookup(UserForm1.Selectprodcutcombo.Value‌​, _ 
      lookupRange, 1, False) 

當然,你將需要修改您的表單和組合框的名稱,基於您的表單的設計。

+0

謝謝您的回覆。我已經將此添加到vb腳本中,但由於字符無效,現在我正在獲取編譯錯誤。是否有任何你注意到的錯誤?產品= Application.worksheetfunction.VLOOKUP(UserForm1.Selectprodcutcombo.Value,產品!$ A $ 2:$ A $ 1679,1,FALSE) – 2015-02-23 22:10:54

+1

哦是的,這對VBA來說都是錯誤的,堅持...... – 2015-02-23 22:11:27

+0

謝謝你的幫助。期待測試它。 – 2015-02-23 22:20:00