VBA 打印特定工作表而不是活动工作表

Question

我的表单上有一个打印按钮，它将弹出“打印”对话框，如果我打印，它将打印活动工作表。我可以将打印分配给隐藏的工作表吗？让我们说“Sheet17”。任何帮助将不胜感激。

'私有子PrintButton1_Click()

Application.Dialogs(xlDialogPrint).Show

结束子'

这是我目前拥有的代码，工作正常。我只想打印一张特定的纸。

Answer 1

无论是使用 VBA 代码还是手动，都无法在 Excel 中打印隐藏工作表。请尝试一下。

Private Sub PrintButton1_Click()
    Dim ShtStatus
    With Sheets("Sheet17")
        ShtStatus = .Visible
        .Visible = xlSheetVisible
        .PrintOut copies:=1, Collate:=True
        .Visible = ShtStatus
    End With
End Sub