Shaune đã viết một macro để in, cho người viết PDF, các tờ thông tin sản phẩm. Khi anh ta in cho người viết PDF, macro sẽ đặt lại máy in mặc định cho hệ thống mà nó đang chạy, để khi ai đó cố gắng in thường xuyên (sau khi macro kết thúc), Word vẫn giả định rằng người dùng muốn in Trình viết PDF. Shaune đang tìm cách để macro của mình tạm thời sử dụng trình ghi PDF mà không cần đặt lại máy in mặc định.

Tin xấu, Shaune, là bạn không thể thiết lập lại máy in. Khi bạn đặt lại thuộc tính ActivePrinter, thì Word sẽ giả định rằng máy in bạn chỉ định vẫn là máy in hoạt động (mặc định) cho đến khi bạn đặt lại nó một cách cụ thể.

Tin tốt là bạn cũng có thể đọc thuộc tính ActivePrinter, có nghĩa là macro của bạn có thể lưu bất kỳ máy in nào mà người đó đã chọn trước khi chạy macro, sau đó đặt lại thuộc tính ActivePrinter trước khi thoát. Kết quả là người dùng không bao giờ nhận thấy rằng máy in mặc định đã được thay đổi, bởi vì macro của bạn đã cảm nhận cài đặt và sau đó thay đổi lại. Kỹ thuật này được sử dụng theo cách này:

Sub PrinterTechnique()

Dim sCurrentPrinter as String     Dim sPDFwriter as String

' perform whatever tasks need to be done prior to printing ' make sure you also initialize the sPDFwriter string with ' the name of your PDF writer

' save current printer name, then change to PDF writer     sCurrentPrinter = Application.ActivePrinter     Application.ActivePrinter = sPDFwriter

' print document, then go back to the original printer     ActiveDocument.PrintOut     Application.ActivePrinter = sCurrentPrinter

' continue with the rest of your macro

End Sub

_Lưu ý: _

Nếu bạn muốn biết cách sử dụng các macro được mô tả trên trang này (hoặc trên bất kỳ trang nào khác trên các trang WordTips), tôi đã chuẩn bị một trang đặc biệt bao gồm thông tin hữu ích.

WordTips là nguồn của bạn để đào tạo Microsoft Word hiệu quả về chi phí.

(Microsoft Word là phần mềm xử lý văn bản phổ biến nhất trên thế giới.) Mẹo này (318) áp dụng cho Microsoft Word 97, 2000, 2002 và 2003. Bạn có thể tìm thấy phiên bản của mẹo này cho giao diện ribbon của Word (Word 2007 và sau này) tại đây: