Export (0) Print
Expand All
Expand Minimize

Workbook.PrintOut Method

Prints the workbook.

Namespace:  Microsoft.Office.Tools.Excel
Assemblies:   Microsoft.Office.Tools.Excel (in Microsoft.Office.Tools.Excel.dll)
  Microsoft.Office.Tools.Excel.v4.0.Utilities (in Microsoft.Office.Tools.Excel.v4.0.Utilities.dll)

'Declaration
Sub PrintOut ( _
	From As Object, _
	To As Object, _
	Copies As Object, _
	Preview As Object, _
	ActivePrinter As Object, _
	PrintToFile As Object, _
	Collate As Object, _
	PrToFileName As Object _
)

Parameters

From
Type: System.Object

The number of the page at which to start printing. If this argument is omitted, printing starts at the beginning.

To
Type: System.Object

The number of the last page to print. If this argument is omitted, printing ends with the last page.

Copies
Type: System.Object

The number of copies to print. If this argument is omitted, one copy is printed.

Preview
Type: System.Object

true to have Microsoft Office Excel invoke print preview before printing the object. false to print the object immediately.

ActivePrinter
Type: System.Object

Sets the name of the active printer.

PrintToFile
Type: System.Object

true to print to a file. If PrToFileName is not specified, Excel prompts the user to enter the name of the output file.

Collate
Type: System.Object

true to collate multiple copies.

PrToFileName
Type: System.Object

If PrintToFile is set to true, this argument specifies the name of the file you want to print to.

"Pages" in the descriptions of From and To refers to printed pages, not to overall pages in the sheet or workbook.

Optional Parameters

For information on optional parameters, see Optional Parameters in Office Solutions.

The following code example uses the PrintOut method to print one copy of the first two printed pages of the current workbook to a printer.

Private Sub WorkbookPrintOutPrinter()
    ' Add a range value to make sure that the workbook prints. 
    ' An empty workbook will not be printed.
    Globals.Sheet1.Range("A1", "A5").Value2 = 55
    Me.PrintOut(1, 2, 1, False, "HP17642", False, False)
End Sub

The following code example uses the PrintOut method to print one copy of the first two printed pages of the current workbook to a file named C:\MyData.xls.

Private Sub WorkbookPrintOutFile()
    ' Add a range value to make sure that the workbook prints. 
    ' An empty workbook will not be printed.
    Globals.Sheet1.Range("A1", "A5").Value2 = 55
    Me.PrintOut(1, 2, 1, False, PrintToFile:=True, Collate:=False, _
        PrToFileName:="c:\MyData.xlsx")
End Sub

Show:
© 2014 Microsoft