[Hỏi] Về việc in biên bản nghiệm thu hàng loạt tự động

Liên hệ QC
bạn xem file đúng ý không nha, vì không biết tương ứng với hạng mục bạn cần in cái gì nên mình làm thêm mấy cột từ AC đến AK của sheets data để điền tên sheet bạn cần in nhá ( cần in sheet nào thì "x" vào nó)
nhấn vào "IN" rồi nhập
vd: muốn in từ STT 1 đến 3, rồi nhảy sang 4, rồi 6 tới 7, rồi 9 thì nhập như thế này
1-3;4;6-7;9
tức là các STT ngăn cách nhau bởi dấu ";", còn muốn liên tiếp thì ngăn nhau bằng dấu "-" giống như trong Ctrl+ P ấy
rồi nó in thôi.
bạn xem code rồi có gì chỉnh sửa lại, mình có chú thích sẵn đọc hiểu ngay ý mà, còn nếu muốn in đủ trò thì mình có 1 AddIns mình viết cho công việc. cần thì mình gửi.
anh chia sẻ addin cho anh em tham khảo với ạ :). E cảm ơn
 
bạn xem file đúng ý không nha, vì không biết tương ứng với hạng mục bạn cần in cái gì nên mình làm thêm mấy cột từ AC đến AK của sheets data để điền tên sheet bạn cần in nhá ( cần in sheet nào thì "x" vào nó)
nhấn vào "IN" rồi nhập
vd: muốn in từ STT 1 đến 3, rồi nhảy sang 4, rồi 6 tới 7, rồi 9 thì nhập như thế này
1-3;4;6-7;9
tức là các STT ngăn cách nhau bởi dấu ";", còn muốn liên tiếp thì ngăn nhau bằng dấu "-" giống như trong Ctrl+ P ấy
rồi nó in thôi.
bạn xem code rồi có gì chỉnh sửa lại, mình có chú thích sẵn đọc hiểu ngay ý mà, còn nếu muốn in đủ trò thì mình có 1 AddIns mình viết cho công việc. cần thì mình gửi.

Cảm ơn bác nhiều ạ, nhưng em thấy cái này nó rối rối sao á. Chắc tại em ngu dốt nên em thấy nó phức tạp quá. :(
 
À, em quên, lúc nãy em rename các sheet theo thứ tự mà quên chỉnh lại tên sheet trong code. :=\+
 
anh chia sẻ addin cho anh em tham khảo với ạ :). E cảm ơn
cái đấy mình viết cho công việc làm hồ sơ nghiệm thu bác ak. nếu bác làm xây dựng thì mình chia sẻ, với lại phải hướng dẫn qua teamview mới đc, chứ nhìn vào cũng chả biết cách dùng gì đâu. với lại mình thêm đủ thứ trên trời dưới đất hết (để thuận tiện làm hồ sơ) nên nhiều Sub rác lắm.
Cảm ơn bác nhiều ạ, nhưng em thấy cái này nó rối rối sao á. Chắc tại em ngu dốt nên em thấy nó phức tạp quá. :(
rối rối là sao bạn, dễ quản lý sheet cần in theo từng hạng mục mà, rồi có thể in theo hạng mục muốn in- như vậy không tốt hơn là nhấn 1 cái in 1 lèo từ đầu tới cuối, không cho lựa chọn ak.
hay bạn muốn nhấn cancel là nó in 1 lèo hết luôn, chỉ khi nào nhập số vào nó mới in theo ý.
 
À, em quên, lúc nãy em rename các sheet theo thứ tự mà quên chỉnh lại tên sheet trong code. :=\+
mới xem được vài thứ. chỉ bạn thêm công thức cho ngày tháng năm cho nó dễ sử dụng he
=TEXT($S$2;"[$-42A]""Hương Khê, ngày"" d ""tháng"" m ""năm"" yyyy")
 
mới xem được vài thứ. chỉ bạn thêm công thức cho ngày tháng năm cho nó dễ sử dụng he
=TEXT($S$2;"[$-42A]""Hương Khê, ngày"" d ""tháng"" m ""năm"" yyyy")

Bác có thể giải thích cho em biết cái cấu trúc code trên được k ạ, em dốt nên các bác đừng nổi nóng nếu em có hỏi cái gì ngớ ngẩn ạ :(
 
Bác có thể giải thích cho em biết cái cấu trúc code trên được k ạ, em dốt nên các bác đừng nổi nóng nếu em có hỏi cái gì ngớ ngẩn ạ :(
cái đó là công thức excel bác ak, code gì đâu đây. dùng cho chỗ gần tiêu đề biên bản của bạn ấy. còn mấy chỗ khác thì bạn sửa lại cho phù hợp, chứ giờ dùng day() month() year() thì lu xu bu chết. còn nếu bạn muốn giải thích tại sao có chỗ này [$-42A] thì mình không biết, chỉ được chỉ rồi áp dụng thôi.
 
E cũng chả hơn đâu bác ạ.E mon men học mót của mấy ACE trên diễn đàn thôi. E chèn thêm cái thông báo nếu nhỡ bác có nhỡ tay click nhầm cái button ấy. Bác thử nhé!

Nếu muốn xem trước nó ra sao bác bỏ dấu nháy đơn trước sheets(i).print preview đi nhé. cho dấu nháy đơn vào dòng dưới ý.

Bác cho em hỏi cái, em làm thì in được tất cả rồi trừ trường hợp có 1 sheet chia thành 2 trang thì nó chỉ in được 1 trang đầu còn trang 2 k in được, khắc phục sao giờ bác? Ví dụ như sheet CT và sheet lấy mẫu đấy ạ.
 

File đính kèm

  • 06. Tam nap ranh cu 1-303.xlsm
    107.7 KB · Đọc: 23
Lần chỉnh sửa cuối:
file của bạn rất hay nhưng khi in thì nó cũng ra cùng một nội dung thôi, do các biên bản sử dụng hàm vlookup khi giá trị ở ô thay đổi thì nó thay đổi theo, vi du như sheet Phieu CTBT giá trị cột M4 là khi mình điền vào thì nó thay đổi ngày, giờ trên bảng của bạn nếu thêm cột giá trị này thay đổi theo thứ tự in của bạn thì hay quá,
 
bạn xem file đúng ý không nha, vì không biết tương ứng với hạng mục bạn cần in cái gì nên mình làm thêm mấy cột từ AC đến AK của sheets data để điền tên sheet bạn cần in nhá ( cần in sheet nào thì "x" vào nó)
nhấn vào "IN" rồi nhập
vd: muốn in từ STT 1 đến 3, rồi nhảy sang 4, rồi 6 tới 7, rồi 9 thì nhập như thế này
1-3;4;6-7;9
tức là các STT ngăn cách nhau bởi dấu ";", còn muốn liên tiếp thì ngăn nhau bằng dấu "-" giống như trong Ctrl+ P ấy
rồi nó in thôi.
bạn xem code rồi có gì chỉnh sửa lại, mình có chú thích sẵn đọc hiểu ngay ý mà, còn nếu muốn in đủ trò thì mình có 1 AddIns mình viết cho công việc. cần thì mình gửi.
Anh có còn hoạt động không ạ? Em theo lệnh in của anh mà nó không in hàng loạt được và hay báo lỗi runtime error 9
 
Hay q
bạn xem file đúng ý không nha, vì không biết tương ứng với hạng mục bạn cần in cái gì nên mình làm thêm mấy cột từ AC đến AK của sheets data để điền tên sheet bạn cần in nhá ( cần in sheet nào thì "x" vào nó)
nhấn vào "IN" rồi nhập
vd: muốn in từ STT 1 đến 3, rồi nhảy sang 4, rồi 6 tới 7, rồi 9 thì nhập như thế này
1-3;4;6-7;9
tức là các STT ngăn cách nhau bởi dấu ";", còn muốn liên tiếp thì ngăn nhau bằng dấu "-" giống như trong Ctrl+ P ấy
rồi nó in thôi.
bạn xem code rồi có gì chỉnh sửa lại, mình có chú thích sẵn đọc hiểu ngay ý mà, còn nếu muốn in đủ trò thì mình có 1 AddIns mình viết cho công việc. cần thì mình gửi.
Hay quá ạ, ko biết bác còn trên đây ko ạ?
 
bạn xem file đúng ý không nha, vì không biết tương ứng với hạng mục bạn cần in cái gì nên mình làm thêm mấy cột từ AC đến AK của sheets data để điền tên sheet bạn cần in nhá ( cần in sheet nào thì "x" vào nó)
nhấn vào "IN" rồi nhập
vd: muốn in từ STT 1 đến 3, rồi nhảy sang 4, rồi 6 tới 7, rồi 9 thì nhập như thế này
1-3;4;6-7;9
tức là các STT ngăn cách nhau bởi dấu ";", còn muốn liên tiếp thì ngăn nhau bằng dấu "-" giống như trong Ctrl+ P ấy
rồi nó in thôi.
bạn xem code rồi có gì chỉnh sửa lại, mình có chú thích sẵn đọc hiểu ngay ý mà, còn nếu muốn in đủ trò thì mình có 1 AddIns mình viết cho công việc. cần thì mình gửi.
còn nếu muốn in đủ trò thì mình có 1 AddIns mình viết cho công việc. cần thì mình gửi. - Cho mình xin dc o bạn
 
Web KT
Back
Top Bottom