How to Print Odd Or Even Pages In Excel 2007, 2010, 2013 & 2016

Published by Get eSolutions on

Everyone wants to save paper at the time of printout. As a result, we always try to take print both sided using the odd-even feature, either it’s an MS-Word document or pdf file. But unfortunately, MS-Excel doesn’t have this important feature.

So In this video, we are going to share the best method to print odd-even wise directly from Microsoft Excel. This method will work in all MS-Excel versions like 2007, 2010, 2013 & 2016. so Finally watch this video complete & carefully.

getesolutionsMACRO CODE

Sub Odd_Even_Print()
'UpdatebyGeteSolutions20160901
Dim xTotalPages As Long
Dim xStartPage As String
Dim xPage As Integer, xYesorNo
Application.ScreenUpdating = False
xStartPage = InputBox("Enter 1 for Odd, 2 for Even", "Kutools for Excel")
If xStartPage = "" Then Exit Sub
xTotalPages = ActiveSheet.PageSetup.Pages.Count
xYesorNo = MsgBox("Are you sure to print?", vbYesNo, "Kutools for Excel")
If xYesorNo = vbYes Then
  For xPage = Int(xStartPage) To xTotalPages Step 2
    ActiveSheet.PrintOut from:=xPage, To:=xPage
  Next
Else
  Exit Sub
End If
Application.ScreenUpdating = True
End Sub

getesolutionsRELATED VIDEO:


1 Comment

How to Save Macro Code Permanently in Excel… as part of the programme | Get eSolutions · March 21, 2019 at 2:07 pm

[…] How to Print Odd Or Even Pages In Excel 2007, 2010, 2013 & 2016 […]

Leave a Reply

Title