Giúp công thức tính tổng cộng trong data validation và in hàng loạt

Liên hệ QC

carsen4u

Thành viên mới
Tham gia
18/5/12
Bài viết
47
Được thích
0
Mình đang làm file hóa đơn tiền nước, đến bãng tổng hợp thì bí công thức, loay hoay mãi vẫn ko biết dùng công thức/ hàm gì, nhờ các bác xem giùm file đính kèm, giúp giùm mình gấp nhé:

1/ Mình muốn có số tổng cộng trong ô màu vàng sheet Tonghop
2/ Tạo button tại sheet tong hop in hàng loạt các bill

Cám ơn rất nhiều.
TD
 

File đính kèm

Mình đang làm file hóa đơn tiền nước, đến bãng tổng hợp thì bí công thức, loay hoay mãi vẫn ko biết dùng công thức/ hàm gì, nhờ các bác xem giùm file đính kèm, giúp giùm mình gấp nhé:

1/ Mình muốn có số tổng cộng trong ô màu vàng sheet Tonghop
2/ Tạo button tại sheet tong hop in hàng loạt các bill

Cám ơn rất nhiều.
TD
Bạn phải cho biết khối lượng định mức của từng mức giá là bao nhiêu thì mới tính được chứ.
 
Định mức
Mức giá đầu tiên 4.800d/m3/người cho 4 m3 đầu tiên
Mức giá thứ hai 9.200 d/m3 /người cho 4m3 tiếp theo/người
Mức giá cuối cùng 11.000d/m3/người cho số lượng còn lại.

Cám ơn bạn
TD
 
Bạn lưu ý giùm mình, trong sheet tổng hợp, số tổng m3 theo từng đơn giá phải tùy chọn in theo từng tháng (ô B3)
Thanks
TD
 
Định mức
Mức giá đầu tiên 4.800d/m3/người cho 4 m3 đầu tiên
Mức giá thứ hai 9.200 d/m3 /người cho 4m3 tiếp theo/người
Mức giá cuối cùng 11.000d/m3/người cho số lượng còn lại.

Cám ơn bạn
TD
Làm trước cho bạn phần công thức.

Xem file mới nhất.
 
Lần chỉnh sửa cuối:
Cám ơn bạn rất nhiều, mình đang xem lại
Cố gắng giúp thêm phần in 1 lần toàn bộ bill luôn nhé

Thanks
TD
 
Mình cần gấp lắm, mình ko biết VBA nên nhờ các bác giúp giùm phần in bằng macro, danh sách hơn 500 người mà in từng tờ thì lâu quá.

Cám ơn nhiều
TD
 
Mình cần gấp lắm, mình ko biết VBA nên nhờ các bác giúp giùm phần in bằng macro, danh sách hơn 500 người mà in từng tờ thì lâu quá.

Cám ơn nhiều
TD
Tôi nghĩ bạn nên đưa ra điều kiện để in chứ cứ in hết thì phí quá. Ví dụ một hộ trong tháng không sử dụng nước mà cũng in thi có phải là phí không.
 
Tuyệt vời,
Thanks bạn rất nhiều, mình đang học hỏi đoạn code này.
 
Tôi nghĩ bạn nên đưa ra điều kiện để in chứ cứ in hết thì phí quá. Ví dụ một hộ trong tháng không sử dụng nước mà cũng in thi có phải là phí không.

Đúng rồi, cần lọc những hộ ko phát sinh, nhưng vì hiện giờ mình cần gấp để in, khi nào bạn rảnh thì làm thêm giùm mình nhé
Thx
TD
 
Chưa in được bạn ơi, vì căn hộ không phải là số TT, vì vậy chắc phải thêm vô 1 ô số thứ tự, còn ô căn hộ thì tham chiếu qua số TT để in
Brds
TD
 
Chưa in được bạn ơi, vì căn hộ không phải là số TT, vì vậy chắc phải thêm vô 1 ô số thứ tự, còn ô căn hộ thì tham chiếu qua số TT để in
Brds
TD
Thành thật xin lỗi bạn nhé. Vì bạn cần gấp nên mình chưa kịp test thử. Bạn thử lại File này nhé (nếu không cần in hộ nào thì đừng đánh STT)
 

File đính kèm

Lần chỉnh sửa cuối:
Đúng rồi, cần lọc những hộ ko phát sinh, nhưng vì hiện giờ mình cần gấp để in, khi nào bạn rảnh thì làm thêm giùm mình nhé
Thx
TD
Gấp hay không gấp gì cũng tốn bao nhiêu đó thời gian. Vậy sao không nói tôi làm một lần luôn cho đỡ mất thời gian.
Tôi đã làm cho bạn, tạm thời STT nào không phát sinh hoặc không tồn tại trong danh sách sẽ không in.
 

File đính kèm

Đã test xong, cám ơn bạn nhiều
** dư dấu = ở dòng lệnh If CDbl(Den.Value) <= CDbl(Tu.Value) Then
với lại thêm InBill.Hide ở sau msgbox cuối cùng.

** cho mình tham lam thêm chút:
sau khi chọn OK để in, có thêm option: "muốn in những hộ ko ở (ko phát sinh) hay ko" mà ko cần xóa số TT đối với dòng ko muốn in.

Brds
TD
 
Thêm nữa: chặn lỗi "den so" vượt quá số TT trong sheet data

Thx
TD
 
Đã test xong, cám ơn bạn nhiều
** dư dấu = ở dòng lệnh If CDbl(Den.Value) <= CDbl(Tu.Value) Then
với lại thêm InBill.Hide ở sau msgbox cuối cùng.

** cho mình tham lam thêm chút:
sau khi chọn OK để in, có thêm option: "muốn in những hộ ko ở (ko phát sinh) hay ko" mà ko cần xóa số TT đối với dòng ko muốn in.

Brds
TD
Hướng dẫn thôi nhé, bạn tự làm (hy vọng là được vì bạn đã biết VBA)
Lập thêm Msgbox có lựa chọn Yes/No.
- Nếu chọn Yes thì in bình thường như chương trình đã viết
- Nếu chọn No thì: If sheet2.[G13].value >0 then sheet2.PrinOut
 
OK, thanks, sẽ cố gắng làm vì mình chưa biết về VBA, chỉ có thể mày mò hiểu những đoạn code mà các bạn viết.
 
Web KT

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

Back
Top Bottom