作者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/cn.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