Code vba lập và in hóa đơn

  • Thread starter Thread starter BoKuDo
  • Ngày gửi Ngày gửi
Liên hệ QC

BoKuDo

Thành viên chính thức
Tham gia
17/12/13
Bài viết
92
Được thích
5
Nghề nghiệp
Kế toán
Nhờ các bạn trên GPE giúp mình đoạn code vba với mục đích tạo và tin hóa đơn thanh toán tiền.
Nội dung mình có ghi ở file đính kèm, cụ thể các bước như sau:

1. khi mình đánh mã hàng ở cột B thì các nội dung ở dòng đó hiện ra giống nội dung bên sheet "DanhMuc"
2. ở ô J4 sẽ hiện tổng tiền trên hóa đơn và ô J5 sẽ hiện số tiền phải thanh toán
3. Khi nhấn nút in thì dữ liệu bên sheet "HoaDon" sẽ chuyển qua bảng mẫu bên sheet "MauIn" và tiến hành in
Mình cảm ơn!
 

File đính kèm

Tôi nghĩ bạn nên dùng các function có sẵn excel ở câu 1 và 2.
Gợi ý: Những hạng mục nước ta gom chung thành 1 sheetNc và sản phẩm khác gom thành 1 sheetSp khi đó lập công thức vlookup nhanh hơn và tiết kiệm chi phí rất nhiều.
Demo
=IFERROR(VLOOKUP("điều kiện",sheetNc$,"cột cần getData","1 || 0"),"Trường hợp ngược lại khi ko tìm thấy ở sheetNc thì cho tìm ở sheetSp")

Cảm ơn bạn đã đọc bài.
 
Upvote 0
Tôi nghĩ bạn nên dùng các function có sẵn excel ở câu 1 và 2.
Gợi ý: Những hạng mục nước ta gom chung thành 1 sheetNc và sản phẩm khác gom thành 1 sheetSp khi đó lập công thức vlookup nhanh hơn và tiết kiệm chi phí rất nhiều.
Demo
=IFERROR(VLOOKUP("điều kiện",sheetNc$,"cột cần getData","1 || 0"),"Trường hợp ngược lại khi ko tìm thấy ở sheetNc thì cho tìm ở sheetSp")

Cảm ơn bạn đã đọc bài.
Cảm ơn ý của bạn!
Vẫn mong sẽ có bạn giúp về vấn đề của mình.
Lễ vui vẻ!
 
Upvote 0
Cảm ơn bạn.
Ở câu 3 phải s/d vba -> event của button *In*
- Nút *In* có 2 thao tác:
+ 1/ khi chọn 1 stt tự trên row getData qua theo thông row được chọn chuyển qua sheetMauin
+ 2/ Gọi lệnh print và active sheetMauin vba có library hổ trợ nhé.
Không biết phải ý bạn muốn như thế ko?
 
Upvote 0
Cảm ơn ý của bạn!
Vẫn mong sẽ có bạn giúp về vấn đề của mình.
Lễ vui vẻ!
Bạn thử xem, mình có sửa lại phần danh mục nên để theo một list. Code sưu tầm của thầy ndu và có chỉnh sửa lại theo ý bạn.
 

File đính kèm

Upvote 0
Nhờ các bạn trên GPE giúp mình đoạn code vba với mục đích tạo và tin hóa đơn thanh toán tiền.
Nội dung mình có ghi ở file đính kèm, cụ thể các bước như sau:

1. khi mình đánh mã hàng ở cột B thì các nội dung ở dòng đó hiện ra giống nội dung bên sheet "DanhMuc"
2. ở ô J4 sẽ hiện tổng tiền trên hóa đơn và ô J5 sẽ hiện số tiền phải thanh toán
3. Khi nhấn nút in thì dữ liệu bên sheet "HoaDon" sẽ chuyển qua bảng mẫu bên sheet "MauIn" và tiến hành in
Mình cảm ơn!
Quán bạn có bao nhiêu bàn, tên bàn là gì? Có lầu hay trệt không?
Nên có sheet theo dõi tất cả các bàn, làm như bạn thì mới có 1 bàn.

A_Sodo.JPG
 
Lần chỉnh sửa cuối:
Upvote 0
Bạn thử xem, mình có sửa lại phần danh mục nên để theo một list. Code sưu tầm của thầy ndu và có chỉnh sửa lại theo ý bạn.
Cảm ơn bạn đã giúp!
ở sheet MauIn chỉ là form mẫu, khi đưa các nội dung bên sheet HoaDon qua xong thì form ở sheet MauIn sẽ được trả về như lúc ban đầu.
và ở đây bạn có thể giúp đem luôn các dữ liệu Tổng hóa đơn, Thanh toán, Thuế VAT, Giảm giá, Phí giao hàng, Giảm tiền trực tiếp (Nếu có) qua sheet MauIn khi in luôn.
 
Upvote 0
Lần chỉnh sửa cuối:
Upvote 0
Cảm ơn bạn đã giúp!
ở sheet MauIn chỉ là form mẫu, khi đưa các nội dung bên sheet HoaDon qua xong thì form ở sheet MauIn sẽ được trả về như lúc ban đầu.
và ở đây bạn có thể giúp đem luôn các dữ liệu Tổng hóa đơn, Thanh toán, Thuế VAT, Giảm giá, Phí giao hàng, Giảm tiền trực tiếp (Nếu có) qua sheet MauIn khi in luôn.

"dữ liệu Tổng hóa đơn, Thanh toán, Thuế VAT, Giảm giá, Phí giao hàng, Giảm tiền trực tiếp (Nếu có)": Cái này bạn tự làm công thức tại dòng từ 89 trở xuống. Mẫu in này mỗi lần chuyển dữ liệu mới thì dữ liệu cũ sẽ bị xóa đi.
 
Upvote 0
Web KT

Bài viết mới nhất

Back
Top Bottom