เพิ่มข้อความใน combobox
Posted: Wed Jan 16, 2013 10:20 am
จากไฟล์ผมต้องการเพิ่ม "ทุกรายการ" ใน combobox เพื่อแสดงยอดขายทั้งหมดใน query1_subform ครับ ขอคำแนะนำด้วยครับ
Code VBA ที่เขียนไว้แล้วอยู่ใน Module ใด ชื่อว่าอะไรครับ 
Excel Forum
ฟอรัม Excel, VBA และอื่นๆ ของคนไทยเพื่อประโยชน์ของทุกคนในจักรวาล (Forum Excel, VBA and others of Thai people for everyone in the universe.)
http://snasui.com/
เพิ่มข้อความใน combobox
Page 1 of 1
Re: เพิ่มข้อความใน combobox
Posted: Wed Jan 16, 2013 4:43 pm
Code VBA ที่เขียนไว้แล้วอยู่ใน Module ใด ชื่อว่าอะไรครับ Re: เพิ่มข้อความใน combobox
Posted: Thu Jan 17, 2013 8:32 am
อยู่ใน form1 ครับ
คร่าวๆ คือผมเขียน query ดึง table1 table2 แล้วใช้ combobox ในform1 ดึง query แล้วเขียน vba ให้ subform ชี้ไปที่ combobox
คร่าวๆ คือผมเขียน query ดึง table1 table2 แล้วใช้ combobox ในform1 ดึง query แล้วเขียน vba ให้ subform ชี้ไปที่ combobox
Re: เพิ่มข้อความใน combobox
Posted: Thu Jan 17, 2013 9:53 am
Combo3 ใช้ Table1 เป็น Row Source หากต้องการให้มีค่าอื่นนอกเหนือไปจากนั้นก็ต้องไปเพิ่มค่าใน Table1 ครับ หรือไม่อย่างนั้นก็ต้องเขียน Code สำหรับ Add Item เข้าไปใน Combo3 เอง โดยที่ Item ที่ Add เข้าไปนั้นคือค่าที่ต้องการต่อด้วยค่าใน Table1Re: เพิ่มข้อความใน combobox
Posted: Thu Jan 17, 2013 10:15 am
ผมได้ลองเพิ่ม All ใน table แล้วครับ แต่ปัญหาคือ ใน query1 ไม่รู้ว่าต้องเขียนโค้ดยังไงครับ ของเดิมคือ
[forms]![form1]![Combo3]
[forms]![form1]![Combo3]
Re: เพิ่มข้อความใน combobox
Posted: Thu Jan 17, 2013 10:22 am
ผมเข้าใจว่าถ้าเลือก All ก็ให้เลือกมาทุกคน หากเป็นเช่นนั้นต้องปรับ Query ลองศึกษาการใช้ If ตาม Link นี้ครับ http://msdn.microsoft.com/en-us/library/ms182587.aspxRe: เพิ่มข้อความใน combobox
Posted: Thu Jan 17, 2013 11:16 am
ผมลองเขียนโค้ด
if sname="All" {select * form table1}
ใน query1 แล้วมันฟ้องว่า
Invalid SQL statement;expected 'DELETE', 'INSERT', 'PROCEDURE' , 'SELECT' , or 'UPDATE' .
if sname="All" {select * form table1}
ใน query1 แล้วมันฟ้องว่า
Invalid SQL statement;expected 'DELETE', 'INSERT', 'PROCEDURE' , 'SELECT' , or 'UPDATE' .