Comment imprimer des pages paires ou impaires uniquement dans Excel?
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.
| Kutools for Excel, avec plus de 300 fonctions pratiques, rend vos travaux plus faciles. |
Après 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émo
Meilleurs outils de productivité bureautique
Améliorez vos compétences Excel avec Kutools for Excel et faites l'expérience d'une efficacité comme jamais auparavant. Kutools for Excel offre plus de 300 fonctionnalités avancées pour augmenter la productivité et gagner du temps. Cliquez ici pour obtenir la fonctionnalité dont vous avez le plus besoin...
Office Tab apporte une interface à onglets à Office et facilite grandement votre travail
- Activer l'édition et la lecture par onglets dans Word, Excel, PowerPoint, Publisher, Access, Visio et Project.
- Ouvrez et créez plusieurs documents dans de nouveaux onglets de la même fenêtre, plutôt que dans de nouvelles fenêtres.
- Augmente votre productivité de 50% et réduit des centaines de clics de souris chaque jour!
