Đánh giá chủ đề:
  • 1 Votes - 3 Average
  • 1
  • 2
  • 3
  • 4
  • 5
[Help] Làm sao để in được trang chẳn hoặc trang lẻ trong report access?
#1
Question 
Mình có một report biên bản nghiệm thu của rất nhiều người
Mỗi người 1 biên bản có 2 mặt giấy
Mình muốn in thành 2 mặt giấy. Nhưng ACCESS không có chức năng in chẳn lẻ như WORD
Bây giờ mình muốn in 1 loạt trang lẻ rồi đến 1 loạt trang chẳn thì phải làm thế nào.,
Mong các PRO trợ giúp.
040040040040040040040
Chữ ký của nhattiensinh Hãy chia sẻ kinh nghiệm cùng mình trên HeartThuThuatAccess nhé! Chúc vui vẻ rose
Reply
Những người đã cảm ơn
#2
Nếu muốn nhiều tùy biến giống như Word thì sao bạn không xuất dữ liệu ra file Word? Trong 4rum này có nhiều bài viết về xuất dữ liệu ra Word rồi đó (Report là File Word có ưu điểm là đễ tùy biến, đẹp).
Chữ ký của nhannt4 Xin chào, mình là nhannt4, Tham gia http://thuthuataccess.com/forum từ ngày 22-07 -12.
Reply
Những người đã cảm ơn Noname
#3
(14-03-14, 11:24 AM)nhannt4 Đã viết: Nếu muốn nhiều tùy biến giống như Word thì sao bạn không xuất dữ liệu ra file Word? Trong 4rum này có nhiều bài viết về xuất dữ liệu ra Word rồi đó (Report là File Word có ưu điểm là đễ tùy biến, đẹp).

Mính muốn in trực tiếp từ access luôn, không cần chuyển sang định dạng khác!
Chữ ký của nhattiensinh Hãy chia sẻ kinh nghiệm cùng mình trên HeartThuThuatAccess nhé! Chúc vui vẻ rose
Reply
Những người đã cảm ơn
#4
(29-04-14, 12:15 PM)nhattiensinh Đã viết: Mính muốn in trực tiếp từ access luôn, không cần chuyển sang định dạng khác!

Có hai cách:

1/ Gọi hộp thoại print dialog box (Giống như bấm Ctrl + P trong Word)

Mã:
Private Sub cmdPrintdlgBox_Click()
On Error GoTo Err_cmdPrintdlgBox_Click

    DoCmd.OpenReport "rptDanhsach", acViewPreview
    
    On Error Resume Next
    DoCmd.RunCommand acCmdPrint
    DoCmd.Close acReport, "rptDanhsach"

Exit_cmdPrintdlgBox_Click:
    Exit Sub

Err_cmdPrintdlgBox_Click:
    MsgBox Err.Description
    Resume Exit_cmdPrintdlgBox_Click
    
End Sub

2/Tự tạo form cho phép chọn máy in, chọn trang in, chọn kiểu in chẵn, lẻ...

[Hình: 3005167027_1737981820_574_574.jpg]

[Hình: 3005167028_406134094_574_574.jpg]

Bạn xem cách làm trong file ví dụ nhé:

Download Demo

Chúc Vui! 015
Chữ ký của MTNQ Thời gian nước chảy... da mòn
Ngủ quên một chốc thấy còn bộ xương!
Reply
Những người đã cảm ơn Noname , mrsiro , maidinhdan
#5
Bản cập nhật:
1/Sửa lỗi "Từ trang", "Đến trang" bị bỏ trống hoặc bằng 0
2/Sửa lỗi "Từ trang" > "Đến trang"
3/Bổ sung thêm tùy chọn "Số bản sao" và "Chất lượng in"

Demo Print Options 2.rar

Có yêu cầu gì thêm các bạn góp ý nhé 015
Chữ ký của MTNQ Thời gian nước chảy... da mòn
Ngủ quên một chốc thấy còn bộ xương!
Reply
Những người đã cảm ơn trunghieu , Noname , mrsiro , ledangvan , maidinhdan
#6
Trích dẫn:Bản cập nhật:
1/Sửa lỗi "Từ trang", "Đến trang" bị bỏ trống hoặc bằng 0
2/Sửa lỗi "Từ trang" > "Đến trang"
3/Bổ sung thêm tùy chọn "Số bản sao" và "Chất lượng in"

Demo Print Options 2.rar

Có yêu cầu gì thêm các bạn góp ý nhé undefined
Bạn ơi giúp mình với, mình sử dụng file của bạn để import dữ liệu module và fdlgPrinter vào file của mình nhưng sao khi chạy lệnh in thì số liệu ở ô đến trang không tự động điền tổng số trang mà chỉ có giá trị "0" vậy bạn?
ko biết sai chổ nào nữa, bạn có thể giải thích dùm, ban thông cảm do file dữ liệu của mình là tài liệu mật của ngành, nên kko thể up file lên cho bạn xem được. 040

        Me!txtPageTo = Reports(strReport).Pages

sao đoan mã code này lại không trả về giá trị tổng số trang mà lại trả về giá trị "0" không vậy?
Chữ ký của hoanghai902 Xin chào, mình là hoanghai902, Tham gia http://thuthuataccess.com/forum từ ngày 19-11 -13.
Reply
Những người đã cảm ơn
#7
Bạn chú ý trong file Demo của MTNQ ở phần page footer của report có một text box (Text12) có control Source ="Page " & [Page] & " of " & [Pages]

Vì sao phải có text box như vậy thì bạn tham khảo link sau nhé:

https://msdn.microsoft.com/en-us/library...22467.aspx
Chữ ký của MTNQ Thời gian nước chảy... da mòn
Ngủ quên một chốc thấy còn bộ xương!
Reply
Những người đã cảm ơn maidinhdan , hoanghai902


Có thể liên quan đến chủ đề
Chủ đề: Tác giả Trả lời: Xem: Bài mới nhất
  Xin giúp sửa report hiển thị sai giá trị hyuwoo 1 32 6 Giờ trước
Bài mới nhất: cpucloi
  Hỏi cách lập report ledangvan 16 1,207 9 Giờ trước
Bài mới nhất: ledangvan
  [Hỏi] Thay đổi kích cỡ dòng kẻ trong Report trangdv.pchg 7 259 22-02-17, 05:05 PM
Bài mới nhất: trangdv.pchg
  [Hỏi] Điều chỉnh tỷ lệ in report như trong Excel trangdv.pchg 1 73 18-02-17, 04:16 PM
Bài mới nhất: cpucloi
  [Hỏi] In report ở SubForm langtuphidao 9 226 18-02-17, 08:12 AM
Bài mới nhất: langtuphidao

Chuyển nhanh:


User(s) browsing this thread: 1 Guest(s)
Diễn Đàn Thơ Văn Thi Ẩm Lâu|Nhà Hàng Sông Thơ