Page 1 of 1
Combo Box Run Report
Posted: Thu Jul 23, 2015 11:56 am
by nilathxay
อยากสอบถามการใช้ Combo Box ในกาน Run Report ครับ
ึคือผมเข้าไปใส่ค่า ใน Maco แล้ว แต่ ว่าเวลา Run Report ไม่มีข้อมูล ขื้นมา
[Reports]![Rep_All]![Site]=[Forms]![Main]![Combo11] And [Reports]![Rep_All]![Course Title]=[Forms]![Main]![Combo13]
Re: Combo Box Run Report
Posted: Thu Jul 23, 2015 5:11 pm
by snasui
ช่วยแจ้งลำดับการทำงานมาด้วยว่า ให้คลิกปุ่มไหน
Code เขียนไว้ตรงไหน หากถูกต้องคำตอบจะได้เป็นอย่างไร จะได้เข้าใจตรงกันครับ
Re: Combo Box Run Report
Posted: Thu Jul 23, 2015 6:03 pm
by nilathxay
ใน Main Form
ผมสร้าง Combo Box 2ตัวครับ
Site and Course Title
ถ้าผมเลือก
Site "PKM"
Course Title "General Induction"
แล้ว Preview Rep_All ข้อมูลไม้มีเลียคร้บ
[Reports]![Rep_All]![Site]=[Forms]![Main]![Combo11] And [Reports]![Rep_All]![Course Title]=[Forms]![Main]![Combo13]
Re: Combo Box Run Report
Posted: Sun Jul 26, 2015 8:36 pm
by snasui
ถ้าจะอ้างให้ถูกต้องเป็นด้านล่างครับ
[Reports]![Rep_All]![Site]=[Forms]![Main]![Combo11] And [Reports]![Rep_All]![Course Title]=[Forms]![Main]![Combo[color=#FF4000]15[/color]]
ไม่ทราบว่าตอนนี้ได้คำตอบแล้วยังครับ
Re: Combo Box Run Report
Posted: Mon Jul 27, 2015 7:27 am
by nilathxay
snasui wrote: ถ้าจะอ้างให้ถูกต้องเป็นด้านล่างครับ
[Reports]![Rep_All]![Site]=[Forms]![Main]![Combo11] And [Reports]![Rep_All]![Course Title]=[Forms]![Main]![Combo[color=#FF4000]15[/color]]
ไม่ทราบว่าตอนนี้ได้คำตอบแล้วยังครับ
ยังครับ ค้นหาได้ แต่ข้อมูลไม้แสดงผล
Re: Combo Box Run Report
Posted: Sun Aug 02, 2015 4:24 pm
by snasui
ดูตัวอย่างการกำหนด Query ค่าที่จะนำมาแสดงและการ Bound Column ของ Combo11, Combo15 ใน Form Main และการกำหนด Query ReportAll เพื่อรับค่าจาก ComboBox แล้วนำไปแสดง Report Rep_All ตามไฟล์แนบครับ
Re: Combo Box Run Report
Posted: Tue Aug 04, 2015 11:27 am
by bank9597
ลองใช้ VBA แทน macro ครับ
ก่อนอื่น เปลี่ยน RowSource ใน Combo15 ก่อนตามโค๊ดด้านล่าง (เปิด SQL View แล้ววางโค๊ด)
Code: Select all
SELECT Course.[Course Title]
FROM Course;
เปลี่ยน Column Count = 1
เปลี่ยน Column Width = 2.54
ปุ่ม Command21 ให้สร้างโค๊ดVBA (Event On_Click)
Code: Select all
DoCmd.OpenReport "Rep_All", acViewPreview, , "[Course Title]= '" & Me.Combo15 & "' and [Site]=" & Me.Combo11
Re: Combo Box Run Report
Posted: Sun Aug 09, 2015 3:14 pm
by nilathxay
ขอบคุณครับ