无法使用 VBA Excel 打印特定工作表

Question

假设我有一个包含 3 个工作表的工作簿，"Sheet 1"、"Sheet 2" 和 "Sheet 3"。现在我只想打印 "Sheet 1" 所以在 VBA 中我使用了

Sheets("Sheet 1").PrintOut

但是宏仍然打印所有 3 个工作表。当我专门编写代码只打印 1 张时，发生了什么导致它打印所有 3 张？

Activesheet.Printout 'also print all worksheets.

我正在使用：Microsoft Excel Professional Plus 2010

Answer 1

试试这个，告诉我它是否适合你。

Sub PrintTest()
    Dim sh As Worksheet
    For Each sh In ThisWorkbook.Worksheets
        If sh.Name = "Sheet1" Then
            sh.PrintOut Preview:=False, ActivePrinter:="NameOfPrinter", PrintToFile:=True, PrToFileName:=PSFileName
        End If
    Next sh
End Sub

无法使用 VBA Excel 打印特定工作表

Can't Get Excel to Print a Specific Worksheet Using VBA

printing

excel

vba

excel-2010