กระทู้เก่าบอร์ด อ.Yeadram
1,561 1
URL.หัวข้อ /
URL
นำข้อมูลออก เป็น File Excel
นี่คือ Code คำสั่ง Print เฉพาะข้อมูลที่แสดงใน Sub form
แต่ถ้าจะนำข้อมูลออกเฉพาะข้อมูลที่แสดงใน Sub formที่เลือก เป็น File Excel จะต้องเขียน Code อย่างไรครับ?
Private Sub Command4_Click()
On Error GoTo Err_Command4_Click
Dim stDocName As String
DoCmd.OpenReport "Out Query Issue to report by Item", acPrint, , "[Issue to]=Forms![Find issue to report].[text5]"
Exit_Command4_Click:
Exit Sub
Err_Command4_Click:
MsgBox Err.Description
Resume Exit_Command4_Click
End Sub
ขอบคุณ ครับ
แต่ถ้าจะนำข้อมูลออกเฉพาะข้อมูลที่แสดงใน Sub formที่เลือก เป็น File Excel จะต้องเขียน Code อย่างไรครับ?
Private Sub Command4_Click()
On Error GoTo Err_Command4_Click
Dim stDocName As String
DoCmd.OpenReport "Out Query Issue to report by Item", acPrint, , "[Issue to]=Forms![Find issue to report].[text5]"
Exit_Command4_Click:
Exit Sub
Err_Command4_Click:
MsgBox Err.Description
Resume Exit_Command4_Click
End Sub
ขอบคุณ ครับ
1 Reply in this Topic. Dispaly 1 pages and you are on page number 1
Time: 0.3597s
DoCmd.TransferSpreadsheet acExport,,String Expression ที่เป็นชื่อคิวรี่ หรือ SQL Statement ที่ใช้เลือกข้อมูลที่จะให้ส่งออก, String Expression ที่เป็นชื่อ path และ file ของไฟล์ Excel ที่จะสร้าง, True เมื่อต้องการให้มีชื่อฟิลด์ใน Excel ด้วย หรือเป็น False เมื่อไม่ต้องการ
ตย.เช่น DoCmd.TransferSpreadsheet acExport,,"SELECT ... FROM ... WHERE ...", "C:\Output\Out.xls", False