Mọi người xem giúp đoạn code để in phiếu thu chi

[skyxd88]

Mình làm thế nào mà lúc in ra nó toàn bị lỗi. SQ.rar

View more random threads:

• cho tớ xin file kế toán nội bộ bằng excel trong công ty xây dựng quy mô nhỏ
• anh chị cho em file tính lương trên excel với.
• Cách sửa Công thức mãng của excel cho chứng từ ghi sổ
• KẾTOAN VAT TU
• Name Box trong Excel chỉnh sữa như thế nào?
• phân tích tài chính trong E xcel 2007
• Excel trong kế toán cây xăng nhỏ
• ứng dụng excel trong kế toán
• phần mềm quản lý kinh doanh cửa cuốn
• Các Pro vào giúp với: In giấy liên tục A5 toàn bị xoay theo chiều dọc!

[talkmylove]

Ðề: Mọi người xem giúp đoạn code để in phiếu thu chi

Lỗi gì có thấy đâu?
Gợi ý thêm : phần phiếu thu, chi liên 2 lấy theo giá trị của liên 1, khong cần dùng hàm VLOOKUP làm gì
Thân

Oh, thấy rùi

Sub InCT()
    Dim n As Integer
    Dim i As Integer
    Dim Sh As Worksheet
    Dim Sc As Worksheet
    Set Sh = Sheets("in")
    Set Sc = Sheets("PC")
    n = Sh.Range("A10000").End(xlUp).Row
    For i = 3 To n
        Sc.Range("F6") = Sh.Range("A" & i)
        Sc.PrintOut , , Coppies:=1
    Next
End Sub