ผู้ไม่รู้
กระทู้เก่าบอร์ด อ.Yeadram

 803   6
URL.หัวข้อ / URL
ผู้ไม่รู้

มีฟอร์ม F1 เปล่าๆ มี textbox ชื่อ txt1 อยู่อันเดียว ไม่ผูกหรือเชื่อมโยงกับ ตารางใดๆ มีปุ่ม เปิดรายงาน บนหน้าฟอร์มอยู่ 1 ปุ่ม
มีรายงานชื่อ R1 เปล่าๆ มี textbox ชื่อ txt2 อยู่อันเดียว ไม่ผูกหรือเชื่อมโยงกับ ตารางใดๆ

ผมต้องการให้เมื่อคลิกปุ่ม เปิดรายงาน จากหน้าฟอร์ม ให้เอาข้อความ ที่กรอกใน txt1 หน้าฟอร์ม
ไปใส่ใน txt2 หน้ารายงาน ลองเขียนโค้ดแล้วเกิด error ฟ้องว่า ไม่พบเขตข้อมูลที่ถูกอ้างอิง
คิดว่าคงเกิดจากการวิธีการอ้างอิง ที่ผิด ช่วยแก้โค้ดให้ด้วยครับ

DoCmd.OpenReport "R1", acViewPreview, , [txt2] = [Forms]![F1]![txt1]

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

1 @R18842
ขออภัย ดันเอาชื่อไปใส่ในช่องหัวข้อ ดูผิดครับ
2 @R18843
จริงๆ ก็ไม่ต้องใช้ VBA เลยนะครับ ใช้มาโครก็พอ
ทำตามนี้นะครับ

1. ที่ฟอร์ม (ชื่อ frmF1) มี Text Box (ชื่อ txtText1) มี Command Button
2. ที่รายงาน (ชื่อ rptR1) มี Text Box 1 อันชื่อ txtText2
3. ที่ txtText2 ให้กำหนด Control Source เป็น =[Forms]![frmF1]![txtText1]
4. กำหนดมาโครให้ปุ่ม Command Button ในฟอร์มสั่งเปิดรายงาน rptR1

3 @R18844
ถ้าจะใช้ VBA ก็บอกมาละกัน ผมเขียนเอาไว้แล้วล่ะ แต่ผมไม่ชอบมันเลย
4 @R18845
ขอรบกวนเป็น VBA ได้ไม๊ครับ เพราะมาโคร ของผมมันเยอะมาก
จนตอนนี้ ตั้งซื่อ ซ้ำไป ซ้ำมา โยงไปโยงมา จน งง ละครับ
ถ้าเป็น VBA มันจบในโค้ดเดียวได้ไม่ต้องไปโยงอีกน่ะครับ
ขอบคุณท่าน ธัชชัย มากครับผม
5 @R18846
    DoCmd.OpenReport "rptR1", acViewDesign
    Reports!rptR1!txtText2.ControlSource = "=[Forms]![frmF1]![txtText1]"
    DoCmd.OpenReport "rptR1", acViewPreview


ผมชัง Code อันนี้ ตั้งแต่ผมเคยเขียน Code มา
6 @R18847
ขอบคุณครับท่าน ธัชชัย
@ ประกาศใช้งานเว็บบอร์ดใหม่ => บอร์ดเรียนรู้ Access สำหรับคนไทย
แล้วจะใส่ลิ้งอ้างอิงมาที่โพสต์เก่านี้หรือไม่ก็ตามสะดวกครับ
Time: 0.3494s