Πώς να εκτυπώσετε μονές ή ζυγές σελίδες μόνο στο Excel;
Εκτυπώστε μονές ή ζυγές σελίδες μόνο με κώδικα μακροεντολής
Εκτυπώστε μονές ή ζυγές ή συγκεκριμένες σελίδες όπως θέλετε με το Kutools για Excel
Εκτυπώστε μονές ή ζυγές σελίδες μόνο με κώδικα μακροεντολής
1. Ενεργοποιήστε το φύλλο που θέλετε να εκτυπώσετε τις μονές ή ζυγές σελίδες του και πατήστε Alt + F11 για να ανοίξετε το Microsoft Visual Basic για εφαρμογήπαράθυρο.
2. κλικ Κύριο θέμα > ενότηταε και επικολλήστε τον παρακάτω κώδικα στο σενάριο Module. Δείτε το στιγμιότυπο οθόνης:
VBA: Εκτύπωση μονών ή ζυγών σελίδων μόνο
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. Τύπος F5 για να εκτελέσετε τον κώδικα και εμφανίζεται ένα παράθυρο διαλόγου για να επιλέξετε εκτύπωση μονών ή ζυγών σελίδων 1 για εκτύπωση μονών σελίδων, 2 για ομοιόμορφες σελίδες. Δείτε το στιγμιότυπο οθόνης:
4. κλικ OKκαι ένας άλλος διάλογος εμφανίζεται για να βεβαιωθείτε ότι θέλετε να εκτυπώσετε. Δείτε το στιγμιότυπο οθόνης:
5. κλικ Ναι για να συνεχίσετε την εκτύπωση. Και τότε εκτυπώνονται μόνο περίεργες σελίδες ή ακόμη και σελίδες του ενεργού φύλλου.
Εκτυπώστε μονές ή ζυγές ή συγκεκριμένες σελίδες όπως θέλετε με το Kutools για Excel
Εάν διαθέτετε Kutools για Excel, όχι μόνο μπορείτε να εκτυπώσετε ομοιόμορφη ή μονή σελίδα ταυτόχρονα, αλλά και να εκτυπώσετε οποιεσδήποτε σελίδες χρειάζεστε όσο πιο γρήγορα μπορείτε.
Kutools για Excel, με περισσότερα από 300 εύχρηστες λειτουργίες, διευκολύνει τις εργασίες σας. |
Μετά το δωρεάν εγκατάσταση Kutools για Excel, κάντε τα παρακάτω:
Πατήστε Kutools Plus > Εκτύπωση > Εκτύπωση καθορισμένων σελίδων για να ενεργοποιήσετε το Εκτύπωση καθορισμένων σελίδων διαλόγου και ελέγξτε τις επιλογές που πρέπει να χρησιμοποιήσετε για εκτύπωση.
Συμβουλή:
1. Εάν θέλετε να εκτυπώσετε προσαρμοσμένο εύρος σελίδων, όπως τη σελίδα 1,3,5 και τη σελίδα 9 έως 12, πρέπει να ελέγξετε μόνο Προσαρμοσμένο εύρος επιλογή και πληκτρολογήστε έτσι:
2. Μπορείτε επίσης να ορίσετε τα αντίγραφα της εκτύπωσης.
3. Εάν θέλετε να εκτυπώσετε σελίδες με αντίστροφη σειρά, ελέγξτε Εκτύπωση σε αντίστροφη σειρά.
Διαδήλωση
Τα καλύτερα εργαλεία παραγωγικότητας γραφείου
Αυξήστε τις δεξιότητές σας στο Excel με τα Kutools για Excel και απολαύστε την αποτελεσματικότητα όπως ποτέ πριν. Το Kutools για Excel προσφέρει πάνω από 300 προηγμένες δυνατότητες για την ενίσχυση της παραγωγικότητας και την εξοικονόμηση χρόνου. Κάντε κλικ εδώ για να αποκτήσετε τη δυνατότητα που χρειάζεστε περισσότερο...
Το Office Tab φέρνει τη διεπαφή με καρτέλες στο Office και κάνει την εργασία σας πολύ πιο εύκολη
- Ενεργοποίηση επεξεργασίας και ανάγνωσης καρτελών σε Word, Excel, PowerPoint, Publisher, Access, Visio και Project.
- Ανοίξτε και δημιουργήστε πολλά έγγραφα σε νέες καρτέλες του ίδιου παραθύρου και όχι σε νέα παράθυρα.
- Αυξάνει την παραγωγικότητά σας κατά 50% και μειώνει εκατοντάδες κλικ του ποντικιού για εσάς κάθε μέρα!