สอบถามการเขียนAVB เปิดReport โดยเลือกจาก Combobox
กระทู้เก่าบอร์ด อ.Yeadram

 1,379   7
URL.หัวข้อ / URL สอบถามการเขียนAVB เปิดReport โดยเลือกจาก Combobox



วอนผู้รู้ช่วยทีนะครับ อยากทราบโค้ด VBA ในการเปิดReportครับ
โดย ต้องเลือก ComboBox เพื่อระบุชนิดข้อมูลการเปิดreport
ซึ่ง ComboBox จะเลือกกี่อันก็ได้ จะระบุข้อมูลกี่ชนิดก็ได้ในการเปิดreport        ขอบคุณมากครับ

โดย: Maximum เมื่อ: 25 ก.ย. 2556 , 23:00

7 Reply in this Topic. Dispaly 1 pages and you are on page number 1

1 @R17117
ดูข้อที่ติดๆกันนี่แหล่ะ http://thai-access.com/yeadram_view.php?topic_id=3732 เขาใช้ค่าจาก strFilter ไปกรองเอาเฉพาะเรคอดที่ต้องการในฟอร์ม เราก็เอาไปใช้ในการเปิดรีพอตแทนด้วยคำสั่ง docmd.openreport "xxxx",,, strFilter
โดย: . เมื่อ: 26 ก.ย. 2556 , 14:33
2 @R17119
ทำ Report จากคิวรี่ แล้วเขียนเงื่อไขในคิวรี่ให้อ้างอิงถึงชื่อฟอร์มและชื่อฟิวด์ตาม comboBox ที่สร้างไว้ในฟอร์มนั้นครับ การเขียนอ้างอิงใช้ Forms![ชื่อฟอร์ม]![ชื่อฟิวด์]
โดย: สมบัติ เมื่อ: 26 ก.ย. 2556 , 15:41
3 @R17120
อันนี้ใช้เลือกจากหนึ่งคอมโบบ็อกแล้วปริ้นรายงาน
DoCmd.OpenReport "ชื่อรายงาน", acViewPreview, , "[ชื่อคอลัมน์]='" & Me.ชื่อคอมโบบ๊อก& "'"

อันนี้ใช้เลือกจาก2คอมโบบ็อคจะเห็นว่ามันจะเชื่อมกันด้วย And ถ้ามีมากว่า2 ก็ใส่ And เพิ่มต่อไปอีก ได้เรื่อยแล้วแต่เราเลย
[RED]DoCmd.OpenReport "ชื่อรายงาน", acViewPreview, , "[ชื่อคอลัมน์]='" & Me.ชื่อคอมโบบ๊อก& "' AND [ชื่อคอลัมน์]='" & Me.ชื่อคอมโบบ๊อก& "' "[/FONT
โดย: GOD_ENEL เมื่อ: 26 ก.ย. 2556 , 16:58
4 @R17122
ขอบคุณทุกคำแนะนำครับ คือก่อนหน้านี้ผมใช้วิธีเปิดReport ด้วย Macro ครับ แต่พอ มีComboBox มากกว่า1อัน การกำหนดเงื่อนไขมันเลยถูกจำกัดจำนวนตัวอักษร(เชื่อมเงื่อนไขด้วย AND OR ) เลยต้องหันไปพึ่ง VBA ซึ่งไม่เคยแตะเลยครับ ขอบคุณทุกท่านมากครับ ถ้าติดตรงไหนจะถามมาอีกทีนะครับ
โดย: Maximum เมื่อ: 26 ก.ย. 2556 , 20:43
5 @R17131
ใช้คำสั่ง VBA แล้วมันไม่Active ครับ   ลองTest ด้วย MsgBox "Test" ก็ยังไม่ Activeเลยครับ
โดย: Maximum เมื่อ: 27 ก.ย. 2556 , 14:01
6 @R17149
ลองวิธีนี้ดู ตรง Filter "[ชื่อคอลัมน์] .... "
ให้สร้าง Query ที่กรองข้อมูลจาก Combobox1 และ Combobox2
แหล่งข้อมูลของคิวรี่ เหมือนกันกับแหล่งข้อมูลของรายงาน
แต่ ฟิลด์ที่จะกรองกำหนด Criteria เป็น

Forms![ชื่อฟอร์ม].Form![Combobox1] AND Forms![ชือฟอร์ม].Form![Combobox2]

หรือ

[ชื่อฟอร์ม].Form![Combobox1] AND [ชือฟอร์ม].Form![Combobox2]

เจ๊ก็จำไม่ค่อยจะได้เพราะเลิกใช้วิธีนี้ไปนานแล้ว แต่ประมาณนี้แหละ
โดย: U&ME เมื่อ: 30 ก.ย. 2556 , 21:53
7 @R17156
ขอบคุณมากครับ เจ๊
โดย: Maximum เมื่อ: 1 ต.ค. 2556 , 10:25
@ ประกาศใช้งานเว็บบอร์ดใหม่ => บอร์ดเรียนรู้ Access สำหรับคนไทย
แล้วจะใส่ลิ้งอ้างอิงมาที่โพสต์เก่านี้หรือไม่ก็ตามสะดวกครับ
Time: 0.2215s