[算表] 使用combox值進行vlookup查詢

作者: JointBank (噓~ 不要問!)   2017-09-11 14:08:54
軟體: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'
此數需要物件請問這裡要怎麼修正
作者: soyoso (我是耀宗)   2017-09-11 18:20:00
https://i.imgur.com/H39MDDG 如出現於set data這行的話請檢查名稱管理員內是否有ACCCODE該自訂名稱
作者: JointBank (噓~ 不要問!)   2017-09-11 18:39:00
感謝S大 忘記說 是出現在下一行
作者: soyoso (我是耀宗)   2017-09-11 18:55:00
如果是下一行的話,以原文的巨集會先出現變數先定義https://i.imgur.com/T3svJfG因為應是Application,原文為Appliction修改後測試是可行的 https://youtu.be/StGqYkPPtcU
作者: JointBank (噓~ 不要問!)   2017-09-11 19:22:00
謝謝S大 這種小地方真的好容意漏掉 我還對了好幾遍呢
作者: newacc (XD)   2017-09-12 23:22:00
小技巧是打code時全部小寫,換行程式沒有自動幫你大寫就可能有東西打錯
作者: JointBank (噓~ 不要問!)   2017-09-12 23:45:00
感謝nac大大告知技巧newaacnewacc 一直打錯抱歉

Links booklink

Contact Us: admin [ a t ] ucptt.com