Note: The other languages of the website are Google-translated. Back to English

Πώς να εκτυπώσετε πολλές επιλογές σε μία σελίδα στο Excel;

Εάν έχετε ένα μεγάλο φύλλο εργασίας που περιέχει πολλά δεδομένα και τώρα, θέλετε να εκτυπώσετε ορισμένα επιλεγμένα εύρη που δεν είναι συνεχή σε μία σελίδα, έτσι ώστε να μπορείτε να εξοικονομήσετε πολύ χαρτί. Το Excel παρέχει το Ορισμός περιοχής εκτύπωσης δυνατότητα να εκτυπώσουμε πολλές επιλογές ταυτόχρονα, αλλά, κάθε επιλεγμένο εύρος θα εκτυπωθεί ξεχωριστά σε μία σελίδα. Αυτό το άρθρο θα μιλήσει για τον τρόπο εκτύπωσης πολλαπλών μη συνεχών επιλογών σε μία σελίδα.

Εκτυπώστε πολλές επιλογές από ένα φύλλο εργασίας σε μία σελίδα με κωδικό VBA

Εκτυπώστε πολλές επιλογές από ένα ή περισσότερα φύλλα εργασίας σε μία σελίδα με το Kutools για Excel


Εκτυπώστε πολλές επιλογές από ένα φύλλο εργασίας σε μία σελίδα με κωδικό VBA

Για να εκτυπώσετε πολλές επιλεγμένες μη συνεχόμενες επιλογές ενός φύλλου εργασίας σε μία σελίδα, ο ακόλουθος κώδικας VBA μπορεί να σας βοηθήσει, κάντε τα εξής:

1. Τύπος Ctrl για να επιλέξετε τα εύρη που θέλετε να εκτυπώσετε.

2. Κρατήστε πατημένο το ALT + F11 και ανοίγει το Microsoft Visual Basic για εφαρμογές παράθυρο.

3. Κλίκ Κύριο θέμα > Μονάδα μέτρησηςκαι επικολλήστε τον ακόλουθο κώδικα στο Μονάδα μέτρησης Παράθυρο.

Κωδικός VBA: Εκτυπώστε πολλές επιλογές σε μία σελίδα

Sub PrintOutRange()
'Updateby Extendoffice
Dim xRng1 As Range
Dim xRng2 As Range
Dim xNewWs As Worksheet
Dim xWs As Worksheet
Dim xIndex As Long
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Set xWs = ActiveSheet
Set xNewWs = Worksheets.Add
xWs.Select
xIndex = 1
For Each xRng2 In Selection.Areas
    xRng2.Copy
    Set xRng1 = xNewWs.Cells(xIndex, 1)
    xRng1.PasteSpecial xlPasteValues
    xRng1.PasteSpecial xlPasteFormats
    xIndex = xIndex + xRng2.Rows.Count
Next
xNewWs.Columns.AutoFit
xNewWs.PrintOut
xNewWs.Delete
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub

4. Στη συνέχεια πατήστε F5 για να εκτελέσετε αυτόν τον κωδικό και τα επιλεγμένα εύρη θα εκτυπωθούν ταυτόχρονα και θα εκτυπωθούν σε μία σελίδα.


Εκτυπώστε πολλές επιλογές από ένα ή περισσότερα φύλλα εργασίας σε μία σελίδα με το Kutools για Excel

Ο παραπάνω κωδικός μπορεί να σας βοηθήσει να εκτυπώσετε τα επιλεγμένα εύρη από ένα φύλλο εργασίας, εάν θέλετε να εκτυπωθούν πολλές επιλογές από πολλά φύλλα εργασίας σε μία σελίδα, ο παραπάνω κώδικας δεν θα λειτουργήσει. Μην ανησυχείτε, εδώ, μπορώ να σας παρουσιάσω ένα εύχρηστο εργαλείο - Kutools για Excel, Με τους Εκτύπωση Οδηγού πολλαπλής επιλογής βοηθητικό πρόγραμμα, μπορείτε να εκτυπώσετε τις επιλογές από ένα φύλλο εργασίας ή πολλά φύλλα εργασίας σε μία σελίδα ταυτόχρονα.

Kutools για Excel : με περισσότερα από 300 εύχρηστα πρόσθετα Excel, δωρεάν δοκιμή χωρίς περιορισμό σε 30 ημέρες

Μετά την εγκατάσταση Kutools για Excel, κάντε τα παρακάτω βήματα:

1. Κλίκ Kutools Plus > Εκτύπωση > Εκτύπωση Οδηγού πολλαπλής επιλογής, δείτε το στιγμιότυπο οθόνης:

2. Στην Εκτύπωση Οδηγού πολλαπλής επιλογής, Κλίκκουμπί προσθήκης εγγράφου κουμπί για να επιλέξετε και να προσθέσετε το εύρος που θέλετε να εκτυπώσετε στο πλαίσιο λίστας Ranges to print μία προς μία, (μπορείτε να επιλέξετε τα εύρη από ένα φύλλο εργασίας ή πολλά φύλλα εργασίας), κάντε κλικ στο κουμπί κουμπί αφαίρεσης εγγράφων Το κουμπί μπορεί να αφαιρέσει τις περιοχές που δεν χρειάζεστε, δείτε το στιγμιότυπο οθόνης:

doc εκτύπωση πολλαπλών επιλογών 2

3. Αφού προσθέσετε τις επιλογές στο πλαίσιο λίστας, κάντε κλικ Επόμενη >> για να μεταβείτε στο βήμα 2 του οδηγού, καθορίστε τις ρυθμίσεις εκτύπωσης όπως χρειάζεστε και μπορείτε να προσθέσετε μια κενή σειρά μεταξύ των επιλεγμένων περιοχών με επιταγή Προσθέστε μια κενή σειρά μεταξύ εύρους επιλογή, δείτε το στιγμιότυπο οθόνης:

doc εκτύπωση πολλαπλών επιλογών 3

4. Στη συνέχεια, κάντε κλικ Επόμενη >> butoon, στο βήμα 3 του οδηγού, καθορίστε την ενέργεια για το προσωρινό φύλλο εργασίας, μπορείτε να ενεργοποιήσετε το φύλλο εργασίας αλλά να μην εκτυπώσετε, να εκτυπώσετε το φύλλο εργασίας και να το κρατήσετε ή να εκτυπώσετε το φύλλο εργασίας και να το διαγράψετε. Δείτε το στιγμιότυπο οθόνης:

doc εκτύπωση πολλαπλών επιλογών 4

5. Κλίκ φινίρισμα κουμπί, όλα τα επιλεγμένα εύρη έχουν επικολληθεί σε ένα νέο φύλλο εργασίας ως συνδεδεμένα αντικείμενα εικόνας. Και μπορείτε να τα σύρετε και να τα αναδιατάξετε στο φύλλο εργασίας. Δείτε το στιγμιότυπο οθόνης:

doc εκτύπωση πολλαπλών επιλογών 5

6. Όταν εκτυπώνετε αυτό το νέο φύλλο εργασίας, τα εύρη θα εκτυπωθούν σε μία μόνο σελίδα, όπως χρειάζεστε.

Κάντε κλικ για να μάθετε περισσότερα σχετικά με αυτό το βοηθητικό πρόγραμμα Print Multiple Selection Wizard.

Κατεβάστε και δωρεάν δοκιμή Kutools για Excel τώρα!


Επίδειξη: Εκτύπωση πολλαπλών επιλογών από ένα ή περισσότερα φύλλα εργασίας σε μία σελίδα με το Kutools για Excel

Kutools για Excel: με περισσότερα από 300 εύχρηστα πρόσθετα του Excel, δωρεάν δοκιμή χωρίς περιορισμό σε 30 ημέρες. Λήψη και δωρεάν δοκιμή τώρα!

Τα καλύτερα εργαλεία παραγωγικότητας του Office

Το Kutools για Excel λύνει τα περισσότερα από τα προβλήματά σας και αυξάνει την παραγωγικότητά σας κατά 80%

  • Επαναχρησιμοποίηση: Εισαγάγετε γρήγορα σύνθετοι τύποι, γραφήματα και οτιδήποτε έχετε χρησιμοποιήσει στο παρελθόν. Κρυπτογράφηση κυττάρων με κωδικό πρόσβασης Δημιουργία λίστας αλληλογραφίας και στείλτε email ...
  • Super Formula Bar (επεξεργαστείτε εύκολα πολλές γραμμές κειμένου και τύπου). Διάταξη ανάγνωσης (εύκολη ανάγνωση και επεξεργασία μεγάλου αριθμού κελιών). Επικόλληση σε φιλτραρισμένο εύρος...
  • Συγχώνευση κελιών / σειρών / στηλών χωρίς απώλεια δεδομένων · Περιεχόμενο διαχωρισμού κελιών Συνδυάστε διπλές σειρές / στήλες... Αποτροπή διπλών κυττάρων; Συγκρίνετε τα εύρη...
  • Επιλέξτε Διπλότυπο ή Μοναδικό Σειρές; Επιλέξτε Κενές σειρές (όλα τα κελιά είναι κενά). Σούπερ εύρεση και ασαφής εύρεση σε πολλά βιβλία εργασίας. Τυχαία επιλογή ...
  • Ακριβές αντίγραφο Πολλαπλά κελιά χωρίς αλλαγή της αναφοράς τύπου. Αυτόματη δημιουργία αναφορών σε πολλαπλά φύλλα? Εισαγωγή κουκκίδων, Πλαίσια ελέγχου και άλλα ...
  • Εξαγωγή κειμένου, Προσθήκη κειμένου, Κατάργηση κατά θέση, Αφαιρέστε το διάστημα; Δημιουργία και εκτύπωση υποσύνολων σελιδοποίησης. Μετατροπή περιεχομένου και σχολίων μεταξύ κελιών...
  • Σούπερ φίλτρο (αποθηκεύστε και εφαρμόστε σχήματα φίλτρων σε άλλα φύλλα). Προηγμένη ταξινόμηση ανά μήνα / εβδομάδα / ημέρα, συχνότητα και άλλα. Ειδικό φίλτρο με έντονη, πλάγια ...
  • Συνδυάστε βιβλία εργασίας και φύλλα εργασίας; Συγχώνευση πινάκων βάσει βασικών στηλών. Διαχωρίστε τα δεδομένα σε πολλά φύλλα; Μαζική μετατροπή xls, xlsx και PDF...
  • Περισσότερα από 300 ισχυρά χαρακτηριστικά. Υποστηρίζει Office / Excel 2007-2021 και 365. Υποστηρίζει όλες τις γλώσσες. Εύκολη ανάπτυξη στην επιχείρηση ή τον οργανισμό σας. Πλήρεις δυνατότητες δωρεάν δοκιμής 30 ημερών. Εγγύηση επιστροφής χρημάτων 60 ημερών.
kte καρτέλα 201905

Το Office Tab φέρνει τη διεπαφή με καρτέλες στο Office και κάνει την εργασία σας πολύ πιο εύκολη

  • Ενεργοποίηση επεξεργασίας και ανάγνωσης καρτελών σε Word, Excel, PowerPoint, Publisher, Access, Visio και Project.
  • Ανοίξτε και δημιουργήστε πολλά έγγραφα σε νέες καρτέλες του ίδιου παραθύρου και όχι σε νέα παράθυρα.
  • Αυξάνει την παραγωγικότητά σας κατά 50% και μειώνει εκατοντάδες κλικ του ποντικιού για εσάς κάθε μέρα!
κάτω μέρος γραφείου
Σχόλια (2)
Δεν υπάρχουν ακόμη βαθμολογίες. Γίνε ο πρώτος που θα αξιολογήσετε!
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Δοκίμασα τον κώδικα VBA σας με το Excel 2016 και λαμβάνω ένα σφάλμα: Σφάλμα μεταγλώττισης: Δεν έχει οριστεί η δευτερεύουσα συνάρτηση. Αυτή η γραμμή επισημαίνεται: Ορισμός xRng1 = xNewWs.Cells(xIndex, 1)
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
πώς να εκτυπώσετε την περιοχή επιλογής με πολλαπλή εκτύπωση; εννοώ την περιοχή επιλογής που θέλω να εκτυπώσω 10 φορές
Δεν υπάρχουν σχόλια δημοσιεύτηκε ακόμα
Αφήστε τα σχόλιά σας
Δημοσίευση ως επισκέπτης
×
Αξιολογήστε αυτήν την ανάρτηση:
0   Χαρακτήρες
Προτεινόμενες τοποθεσίες

Ακολουθησε μας

Πνευματικά δικαιώματα © 2009 - www.extendoffice.com. | Ολα τα δικαιώματα διατηρούνται. Τροφοδοτείται από ExtendOffice. | Sitemap
Το Microsoft και το λογότυπο του Office είναι εμπορικά σήματα ή σήματα κατατεθέντα της Microsoft Corporation στις Ηνωμένες Πολιτείες ή / και σε άλλες χώρες.
Προστατεύεται από το Sectigo SSL