Declare Function WritePrinter Lib 34;winspool.drv34; Alias 34;WritePrinter34; (ByVal hPrinter As Long, pBuf As Any, ByVal cdBuf As Long, pcWritten As Long) As Long (Bạn có thể liên hệ với tôi fthaoabc@yahoo.com để có bản gốc phần lập trình này). Tuy nhiên không phải máy nào cũng có cài Visual Basic, nên tôi xin giới thiệu cách xây dựng hàm mới ngay chính trong VBA (Visual Basic For Application), một cách làm mà ở bất cứ môi trường Microsoft Office nào cũng có thể thực hiện được. Tôi lấy ví dụ thiết lập thủ tục cho Winword, môi trường nhiều người sử dụng nhất, bạn có thể thiết lập ở các môi trường khác có in và hỗ trợ VBA như EXCEL, ACCESS, POWER POINT... thậm chí cả ACAD, bằng cách tương tự.