Page 1 of 1

การใช้ Vlookup กับ combobox

Posted: Fri Sep 24, 2021 12:41 am
by arjranong@gmail.com
ยังเป็นมือใหม่ขอคำชี้แนะด้วยครับ
จากโคต
จุดประสงค์ จะให้ textbox ต่างๆ ค้นข้อมูล จาก combobox โดยใช้คำสั่ง Vlookup
แต่พอกดรัน มันขึ้น run time error 1004 unable to get the vlookup property of worksheetfunction class
นี่ Code ครับ
Private Sub ComboBox1_Change()

Set xRg = Worksheets("stock").Range("A2:J8")
Me.TextBox_QTY.Value = Application.WorksheetFunction.VLookup(Me.ComboBox1.Value , xRg, 6, 0)


End Sub
*******
ComboBox1 เป็นชื่อรายการของ Stock เช่น ตะปู ฟิวเจอร์บอร์ด ดึงรายการจาก Sheet ที่กำหนดไว้
TextBox_QTY เป็นจำนวนยอดคงเหลือที่เบิกได้ ตั้งใจจะให้แสดงค่าเป็นตัวเลข โดยอาศัยดึงข้อมูลจาก Sheet ที่กำหนดไว้
**********
มันแนบไฟล์ไม่ได้แจ้งเป็นไฟล์ขนาดใหญ่ครับ

Re: การใช้ Vlookup กับ combobox

Posted: Fri Sep 24, 2021 7:33 am
by snasui
:D กรุณาแนบไฟล์มาด้วยจะได้สะดวกในการตอบของเพื่อนสมาชิกครับ

Re: การใช้ Vlookup กับ combobox

Posted: Fri Sep 24, 2021 5:20 pm
by arjranong@gmail.com
นี่ครับ ตั้งใจจะกดให้ขึ้นตรงรายการเบิก และขึ้นจำนวนที่เบิกได้อัตโนมัติ

Re: การใช้ Vlookup กับ combobox

Posted: Fri Sep 24, 2021 5:29 pm
by arjranong@gmail.com
ส่วนนี่ Code ครับ

Code: Select all

Private Sub ComboBox1_Change()

Set xRg = Worksheets("stock").Range("A:I")
Me.TextBox_QTY.Value = Application.WorksheetFunction.VLookup(Me.ComboBox1.Value, xRg, 4, 0)


End Sub

Re: การใช้ Vlookup กับ combobox

Posted: Fri Sep 24, 2021 5:33 pm
by puriwutpokin
ปรับส่วนนี้ครับ

Code: Select all

Set xRg = Worksheets("stock").Range("C2:J8")
Me.TextBox_QTY.Value = Application.WorksheetFunction.VLookup(Me.ComboBox1.Value, xRg, 2, 0)

Re: การใช้ Vlookup กับ combobox

Posted: Sat Sep 25, 2021 10:36 pm
by arjranong@gmail.com
ขอบคุณมากครับ รบกวนขอสอบถามนะครับ ตกลง Vlookup จะนับ collumn แรก จาก collumn ที่เรากำหนดให้เป็นสิ่งที่ต้องการค้นหาก่อนใช้มั้ยครับ

Re: การใช้ Vlookup กับ combobox

Posted: Sun Sep 26, 2021 7:05 am
by snasui
arjranong@gmail.com wrote: Sat Sep 25, 2021 10:36 pm Vlookup จะนับ collumn แรก จาก collumn ที่เรากำหนดให้เป็นสิ่งที่ต้องการค้นหาก่อนใช้มั้ยครับ
:D ไวยากรณ์ของ Vlookup คือ

=VLOOKUP(lookup_value,table_array,col_index_num,range_lookup)

ค่าของ col_index_num หรือลำดับคอลัมน์ที่จะนำมาแสดง นับจากคอลัมน์แรกของของ table_array และจะเป็นเช่นนี้เสมอครับ

Re: การใช้ Vlookup กับ combobox

Posted: Mon Sep 27, 2021 11:17 pm
by arjranong@gmail.com
ขอบคุณมากครับอาจารย์