How to quickly print first page of each sheet?
If you have a workbook which contains multiple worksheets, and you just need to print the first page of each sheet. Actually, you can set the page 1 to 1 in the print settings and print them one by one. But, this will be troublesome and time consuming, are there any quick and easy ways for you to print all the first page of each tab in Excel?
Print first page of each sheet with VBA code
Print first page of each sheet with one click by Kutools for Excel
Print first page of each sheet with VBA code
The following VBA code can help you to quickly print all the first pages of each worksheet at the same time. Please do as follows:
1. Hold down the ALT + F11 keys, and it opens the Microsoft Visual Basic for Applications window.
2. Click Insert > Module, and paste the following code in the Module Window.
VBA code: Print first page of each sheet
Sub PrintAllFirstPage()
'Update 20140924
Dim xWs As Worksheet
For Each xWs In Application.ActiveWorkbook.Worksheets
xWs.PrintOut from:=1, To:=1
Next
End Sub
3. Then press F5 key to run this code, and all the first pages of each tab will be printed at the same time.
Print first page of each sheet with one click by Kutools for Excel
If you have Kutools for Excel installed, there are multiple printting tools in it, and you can use the the Print First Page of Each Worksheet function to print every first page of each sheet.
After free installing Kutools for Excel, please do as below:
Enable the workbook you want to print first page of every sheet only, and then click Kutools Plus > Printing > Print First Page of Each Worksheet, then a Kutools for Excel pops out for reconfirm. See screenshot:
Then all first page of each sheet are printed after the click.
Related articles:
How to print pages with roman numeral page numbers?
How to print multiple workbooks in Excel?
How to print long column on one page in Excel?
How to print pages in reverse order of a worksheet?
Best Office Productivity Tools
Supercharge Your Spreadsheets: Experience Efficiency Like Never Before with Kutools for Excel
Kutools for Excel boasts over 300 features, ensuring that what you need is just a click away...
Supports Office/Excel 2007-2021 & newer, including 365 | Available in 44 languages | Enjoy a full-featured 30-day free trial.
Office Tab Brings Tabbed interface to Office, and Make Your Work Much Easier
- Enable tabbed editing and reading in Word, Excel, PowerPoint, Publisher, Access, Visio and Project.
- Open and create multiple documents in new tabs of the same window, rather than in new windows.
- Increases your productivity by 50%, and reduces hundreds of mouse clicks for you every day!
