作者JointBank (噓~ 不要問!)
看板Visual_Basic
標題[VBA ] 使用COMBOBOX值進行VLOOKUP查詢
時間Mon Sep 11 14:10:05 2017
軟體:EXCEL
版本:2016
欲使用 COMBOX1.VALUE 的值
經由VLOOKUP函數查詢LIST1工作表
其結果寫入TEXTBOX7值內
Private Sub ComboBox1_Change()
Dim data As Range
Dim Str2 As String
Dim ACC_CODE As String
Set data = [ACCCODE]
TextBox7.Text = Appliction.WorksheetFunction.VLookup(ComboBox1.Value,
list2.Range("ACCCODE"), 2, False)
END SUB
執行後出現 錯誤'424'
此數需要物件
請問該段程式碼需如何修改?
謝謝
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 114.37.195.11
※ 文章網址: https://webptt.com/m.aspx?n=bbs/Visual_Basic/M.1505110208.A.249.html
1F：→ fumizuki: list2 是什麼 09/11 22:24
2F：→ JointBank: 工作表名稱 09/11 22:49
3F：→ vincent0926: Appliction少一個a,更改後應該就沒問題了！ 01/02 06:25
4F：→ vincent0926: 另外list2.Range("ACCCODE")可以用已命名的data代替 01/02 06:26