vba Excel - 创建打印宏

Excel - Creating a print macro

提问by BioXhazard

I recorded a macro to print an excel sheet when the button is pressed. But I want to specify the printer that it automatically prints to rather than give the user a choice. I'm also printing to a PDF so is there a way I can choose where I print to?

当按下按钮时，我录制了一个宏来打印 Excel 工作表。但我想指定它自动打印到的打印机，而不是让用户选择。我也打印到 PDF，所以有什么方法可以选择打印到的位置吗？

This is what I have so far:

这是我到目前为止：

Sub Publish()
    '
    ' Publish Macro
    ' Macro recorded 07/09/2010
    '
    ' Keyboard Shortcut: Ctrl+Shift+S
    '
        ActiveWindow.SelectedSheets.PrintOut Copies:=1
    End Sub

采纳答案by JohnK813

Try adding

尝试添加

Application.ActivePrinter = "Printer Name"

Application.ActivePrinter = "Printer Name"

on the line above the PrintOut command. This linkgives more information on ActivePrinter, even though it is geared more for MS Word.

在 PrintOut 命令上方的行上。 此链接提供了有关 ActivePrinter 的更多信息，尽管它更适合 MS Word。