Comment imprimer des pages paires ou impaires uniquement dans Excel?

Comme nous le savons tous, nous pouvons imprimer des pages paires ou impaires uniquement dans Word 2013 dans la section Imprimer comme illustré ci-dessous. Cependant, il n'y a aucune option dans la fonction d'impression d'Excel pour imprimer des pages paires ou impaires. Mais ici, je peux introduire un code qui ne peut imprimer que des pages paires ou impaires dans Excel selon vos besoins.

Imprimer les pages paires ou impaires uniquement avec le code macro
Imprimez des pages impaires, paires ou spécifiques comme vous le souhaitez avec Kutools for Excel

Imprimer les pages paires ou impaires uniquement avec le code macro

1. Activez la feuille sur laquelle vous souhaitez imprimer ses pages paires ou impaires et appuyez sur Alt + F11 clés pour ouvrir le Microsoft Visual Basic pour Applicationfenêtre de s.

2. Cliquez insérer > modulee et collez le code ci-dessous dans le script du module. Voir la capture d'écran:

VBA: imprimer uniquement les pages paires ou impaires

Sub Odd_Even_Print()
'UpdatebyExtendoffice20160901
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

3. presse F5 pour exécuter le code, et une boîte de dialogue apparaît pour vous permettre de choisir l'impression des pages paires ou impaires, entrez 1 pour imprimer des pages impaires, 2 pour les pages paires. Voir la capture d'écran:

4. Cliquez OK, et une autre boîte de dialogue apparaît pour vous assurer que vous souhaitez imprimer. Voir la capture d'écran:

5. Cliquez Oui pour continuer l'impression. Et puis seules les pages impaires ou les pages paires de la feuille active sont imprimées.

Imprimez des pages impaires, paires ou spécifiques comme vous le souhaitez avec Kutools for Excel

Si vous disposez de Kutools pour Excel, vous pouvez non seulement imprimer des pages paires ou impaires à la fois, mais vous pouvez également imprimer toutes les pages dont vous avez besoin aussi rapidement que possible.

Après votre installation gratuite Kutools for Excel, procédez comme suit:

Cliquez Kutools Plus > Impression > Imprimer les pages spécifiées pour activer le Imprimer les pages spécifiées et vérifiez les options que vous devez utiliser pour l'impression.

Conseil:

1. Si vous souhaitez imprimer une plage de pages personnalisée, comme la page 1,3,5, 9, 12 et les pages XNUMX à XNUMX, il vous suffit de vérifier Gamme personnalisée option et tapez comme ceci:

2. Vous pouvez également définir les copies de l'impression.

3. Si vous souhaitez imprimer les pages dans l'ordre inverse, cochez Imprimer dans l'ordre inverse.

  Démonstration