Question

让我们说我有一个包含3个工作表的工作簿，＆＃34;工作表1＆＃34;，＆＃34;工作表2＆＃34;和＆＃34;工作表3＆＃34;。现在我只想打印＆＃34;表1和＃34;所以在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打印特定工作表

1 个答案: