Làm thế nào để lấy được thông tin trong Application.Dialogs(xlDialogPrint)

[Ngày mai trời lại sáng]

Chào các bạn,

Tôi có câu lệnh VBA để hiển thị cửa sổ in: Application.Dialogs(xlDialogPrint).
Nhờ các bạn giúp đỡ code để lấy được thông tin: Tên máy In và Số bản in khi bấm OK.
Xin cảm ơn nhiều.

 

[befaint]

Đây nè .

Add-Ins cho phép chọn in nhiều sheets một lúc

Tiện ích cho phép chọn in nhiều sheets một lúc. Cách đây vài năm, mình tìm mãi mới thấy tiện ích chọn in nhiều sheets một lúc trong phần mềm ASAP Utilities. Lúc đó, mình mới bắt đầu sử dụng tới excel :D Nay có thời gian nên mình làm tiện ích này (có thêm vài lựa chọn...). Mặc dù code còn lủng...

www.giaiphapexcel.com

.

 

[Ngày mai trời lại sáng]

Đây nè .

Add-Ins cho phép chọn in nhiều sheets một lúc

Tiện ích cho phép chọn in nhiều sheets một lúc. Cách đây vài năm, mình tìm mãi mới thấy tiện ích chọn in nhiều sheets một lúc trong phần mềm ASAP Utilities. Lúc đó, mình mới bắt đầu sử dụng tới excel :D Nay có thời gian nên mình làm tiện ích này (có thêm vài lựa chọn...). Mặc dù code còn lủng...

www.giaiphapexcel.com

.

Em cảm ơn anh, đúng là với form tự tạo thì có thể điền thông tin bản in và tên máy in theo ý.
Anh có thể thêm trường hợp chọn Tray in được không?
Vì chỗ em em quy định tray nào a3, tray nào a4, rồi máy có tray quy định giấy màu .

 

[Ngày mai trời lại sáng]

Híc, ... như vậy là trường hợp của em nếu sử dụng: Application.Dialogs(xlDialogPrint) là không có cách nào để lấy được số bản in.