mr.house
2002-07-30, 05:37 PM
我有兩台印表機,一台是點陣式印表機EPSON570,一台是噴墨印表機EPSON460,
請問我該如何在EXECL中不同的活頁中設定不同的印表機?
例如:活頁1設定點陣式印表機EPSON570,活頁2設定噴墨印表機EPSON460:confused:
請問我該如何在EXECL中不同的活頁中設定不同的印表機?
例如:活頁1設定點陣式印表機EPSON570,活頁2設定噴墨印表機EPSON460:confused:
mr.house 2002-07-30, 05:37 PM 我有兩台印表機,一台是點陣式印表機EPSON570,一台是噴墨印表機EPSON460, 請問我該如何在EXECL中不同的活頁中設定不同的印表機? 例如:活頁1設定點陣式印表機EPSON570,活頁2設定噴墨印表機EPSON460:confused: leonchou 2002-09-12, 01:26 PM 最好是選定一台為預設印表機, 才不會影響到其他工作表的列印-- 除非確定此活頁簿中只有這兩張工作表(活頁). 例如以 EPSON460 做為預設印表機: Private Sub Workbook_BeforePrint(Cancel As Boolean) printer = "EPSON460" If ActiveSheet.Name = "活頁1" Then printer = "EPSON570" Application.ActivePrinter = printer End Sub 它的作用是在此活頁簿列印前判斷工作表名稱, 並設定印表機. 這個巨集請放在該活頁簿的 ThisWorkbook 模組中才能正確運作. 而且僅適用這個活頁簿 (其他活頁簿列印時雖然不會執行到這 個程式, 但可能會使用到這個程式前一次設定的印表機.) |