ผมเขียนโค้ดในปุ่ม print   แต่เวลาสั่งปริ้นแล้วมันออกมาตามจำนวนที่มีในฐานข้อมูล ครับ เช่น มี 25 ข้อมูล ก็ออกมาหมดอะครับ ต้องกำหนด หน้า 1 - 1
ตลอดครับ    ช่าวยแนะนำทีครับ
On Error GoTo err_cmdprint_click
    Dim stdocname As String
    stdocname = "Rptairset"
    DoCmd.OpenReport stdocname, acViewPreview
           DoCmd.RunCommand acCmdPrint
exit_cmdprint_click:
        Exit Sub
err_cmdprint_click:
        MsgBox Err.Description
        Resume exit_cmdprint_click
       
    End Sub

ในฟอร์มรายงานผมกำหนดโค้ดแต่ละฟิล์ด
=Forms![ชื่อForms]![textfield] แบบนี้ทุกตัวเลยครับ