In tự động theo form (1 người xem)

[vinhtonx]

Em có file in đơn hàng, hiện tại phải thực hiện rất thủ công, nay muốn in tự động theo các tình huống tùy chọn từ người dùng nhập vào. Các bác giúp em.

File attach có comments chi tiết.

Cám ơn các bác nhiều.

vinhtonx

 

[nhung2008]

Mình nghỉ bạn làm trên access thì dễ dàng hơn.

 

[vinhtonx]

Vẫn đang đợi các cao thủ giúp em vấn đề nan giải này.

 

[Nguyễn Duy Tuân]

Em có file in đơn hàng, hiện tại phải thực hiện rất thủ công, nay muốn in tự động theo các tình huống tùy chọn từ người dùng nhập vào. Các bác giúp em.

File attach có comments chi tiết.

Cám ơn các bác nhiều.

vinhtonx

Tôi đã làm cho bạn phần in tất cả. Bạn xem thế nào.

 

[vinhtonx]

Cám ơn bạn Nguyễn Duy Tuấn đã giúp mình giải quyết tình huống 1.

1- In tất cả các đơn hàng (All) (Check box)

Rất mong nhận được sự trợ giúp của mọi người ở các tình huống tiếp theo:
2- Từ đơn hàng n đến đơn hàng m (Text box).
3- In các đơn hàng theo 1 khách hàng nào đó (Option box).
4- Số bản in (copy) (Textbox)
5- Thực hiện in (OK: button)

 

[sealand]

Xin phép anh Tuân, tôi viết tiếp vào file của anh phần in chọn lựa (Vì phần Print All của anh qua ngon rồi)
Mình đổi Sh.PrintOut thành Sh.PrintPreview để test đã, khi nào ổn rồi thì đổi ngược lại
Nếu ListBox trống thì chuyển sang sheet khác rồi trở lại là có vì mình mới gài 1 sự kiện Activesheet thôi quên chưa gài WorkBook.Open

 

[vinhtonx]

Cám ơn các bác nhiều!

Về các tình huống vấn đề như vậy là đúng với ý của em rồi, tuy nhiên, em muốn nhờ thêm các bác 1 lần nữa cho việc tối ưu hoá của xử lý sự kiện. File attach em đã tạo sẵn form để nhờ các bác viết Code.

 

[sealand]

Bạn tham khảo cách của mình

 

[vinhtonx]

Cám ơn sealand. Thật tuyệt!
Bái phục.

 

[loinguyen212]

Chào mọi người,
Cho em hỏi tại sao khi in bằng đoạn code trên thì máy đợi hơi lâu, nghĩa là khi in bình thường thì print là chạy luôn, nhưng khi áp vào code thì máy đơ khoảng 30s (có khi đợi cả phút) thì máy mới chạy. Không biết có cách nào khắc phục hiện tượng trên không?