Συμβουλή: Άλλες γλώσσες μεταφράζονται από την Google. Μπορείτε να επισκεφθείτε το English έκδοση αυτής της σύνδεσης.
Σύνδεση
x
or
x
x
Κανε ΕΓΓΡΑΦΗ
x

or

Πώς να εξάγετε και να αποθηκεύετε κάθε φύλλο εργασίας ως ξεχωριστό νέο βιβλίο εργασίας στο Excel;

Ας υποθέσουμε ότι θέλετε να εξάγετε και να αποθηκεύσετε ένα ή περισσότερα φύλλα εργασίας ως νέο βιβλίο εργασίας, πώς θα το αντιμετωπίσετε; Κανονικά μπορείτε να αντιγράψετε κάθε φύλλο εργασίας και να επικολλήσετε σε νέο βιβλίο εργασίας. Αλλά εδώ σας φέρουμε μερικά εύχρηστα κόλπα για να το αντιμετωπίσετε:

Εξαγωγή και αποθήκευση φύλλων εργασίας ως νέο βιβλίο εργασίας με εντολή Μετακίνηση ή Αντιγραφή

Εξαγωγή και αποθήκευση φύλλων εργασίας ως νέο βιβλίο εργασίας με κώδικα VBA

Εξαγωγή και αποθήκευση φύλλων εργασίας ως νέο βιβλίο εργασίας με το Kutools για Excel καλή ιδέα3


Γρήγορα διαχωρίστε πολλά φύλλα εργασίας σε ξεχωριστό βιβλίο εργασίας στο Excel

Στο Microsoft Excel, μπορείτε να αποθηκεύσετε ή να χωρίσετε ένα φύλλο εργασίας από ένα βιβλίο εργασίας ως νέο αρχείο Excel αντιγράφοντας και επικολλώντας αυτό το φύλλο εργασίας σε ένα νέο βιβλίο εργασίας. Φαίνεται ενοχλητικό, αν θέλετε να χωρίσετε κάθε φύλλο / φύλλο εργασίας ενός μεγάλου βιβλίου εργασίας ως ξεχωριστό αρχείο Excel, txt, csv, pdf. Αλλά με Kutools για το Excel'S Διαχωρισμένο βιβλίο εργασίας χρησιμότητα, μπορείτε γρήγορα να το αντιμετωπίσετε. Κάντε κλικ για δωρεάν δοκιμαστική περίοδο 60 με πλήρη χαρακτηριστικά!
τεκμηριωμένο βιβλίο εργασίας 1
Kutools για Excel: με περισσότερα από 300 εύχρηστα πρόσθετα του Excel, δωρεάν να δοκιμάσετε χωρίς περιορισμούς σε 60 ημέρες.

arrow μπλε δεξιά φούσκα Εξαγωγή και αποθήκευση φύλλων εργασίας ως νέο βιβλίο εργασίας με εντολή Μετακίνηση ή Αντιγραφή


Χρήση του Μετακίνηση ή Αντιγραφή θα σας βοηθήσει να εξαγάγετε ή να αντιγράψετε γρήγορα ένα ή περισσότερα φύλλα εργασίας σε ένα νέο βιβλίο εργασίας.

Βήμα 1: Επιλέξτε τα ονόματα φύλλου εργασίας στη γραμμή καρτελών. Μπορείτε να επιλέξετε πολλαπλές με το πάτημα του παραθύρου Ctrl κλειδί ή αλλαγή κλειδί.

Βήμα 2: Κάντε δεξί κλικ στο όνομα του φύλλου εργασίας και κάντε κλικ στο Μετακίνηση ή Αντιγραφή από το μενού περιβάλλοντος.
έγγραφα εξαγωγής του εγγράφου 1

Βήμα 3: Σε Μετακίνηση ή Αντιγραφή , επιλέξτε το (καινούργιο βιβλίο) από την αναπτυσσόμενη λίστα του Μετακινήστε τα επιλεγμένα φύλλα για κράτηση.

έγγραφα εξαγωγής του εγγράφου 2

Βήμα 4: Στη συνέχεια κάντε κλικ στο κουμπί OK, τώρα έχετε μεταβεί στο νέο βιβλίο εργασίας με τα εξαγόμενα ή αντιγραμμένα φύλλα εργασίας, κάντε κλικ στην επιλογή φιλέτο > Αποθηκεύσετε για να αποθηκεύσετε το νέο βιβλίο εργασίας.

Σημείωση: Στο Μετακίνηση ή Αντιγραφή το παράθυρο διαλόγου, υπάρχει ένα Δημιουργήστε ένα αντίγραφο επιλογή. Αν δεν το ελέγξετε, θα μετακινήσει τα επιλεγμένα φύλλα εργασίας από το πρωτότυπο βιβλίο εργασίας. αν το ελέγξετε, θα αντιγράψει επιλεγμένα φύλλα εργασίας.


arrow μπλε δεξιά φούσκα Εξαγωγή και αποθήκευση φύλλων εργασίας ως νέο βιβλίο εργασίας με κώδικα VBA

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

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

Βήμα 2: Κάντε κλικ στο κουμπί Κύριο θέμα > Μονάδα μέτρησης, και επικολλήστε την ακόλουθη μακροεντολή στο παράθυρο μονάδας:

VBA: Εξαγωγή και αποθήκευση φύλλων εργασίας ως νέο βιβλίο εργασίας σε νέο φάκελο.

Sub SplitWorkbook()
'Updateby20140612
Dim FileExtStr As String
Dim FileFormatNum As Long
Dim xWs As Worksheet
Dim xWb As Workbook
Dim FolderName As String
Application.ScreenUpdating = False
Set xWb = Application.ThisWorkbook
DateString = Format(Now, "yyyy-mm-dd hh-mm-ss")
FolderName = xWb.Path & "\" & xWb.Name & " " & DateString
MkDir FolderName
For Each xWs In xWb.Worksheets
    xWs.Copy
    If Val(Application.Version) < 12 Then
        FileExtStr = ".xls": FileFormatNum = -4143
    Else
        Select Case xWb.FileFormat
            Case 51:
                FileExtStr = ".xlsx": FileFormatNum = 51
            Case 52:
                If Application.ActiveWorkbook.HasVBProject Then
                    FileExtStr = ".xlsm": FileFormatNum = 52
                Else
                    FileExtStr = ".xlsx": FileFormatNum = 51
                End If
            Case 56:
                FileExtStr = ".xls": FileFormatNum = 56
            Case Else:
                FileExtStr = ".xlsb": FileFormatNum = 50
        End Select
    End If
    xFile = FolderName & "\" & Application.ActiveWorkbook.Sheets(1).Name & FileExtStr
    Application.ActiveWorkbook.SaveAs xFile, FileFormat:=FileFormatNum
    Application.ActiveWorkbook.Close False
Next
MsgBox "You can find the files in " & FolderName
Application.ScreenUpdating = True
End Sub

Βήμα 3: Πατήστε το F5 για να εκτελέσετε αυτόν τον κώδικα. Και θα εμφανιστεί ένα πλαίσιο προτροπής για να σας πει τη θέση των νέων εξαγόμενων βιβλίων εργασίας και όλα τα φύλλα εργασίας του πρωτότυπου βιβλίου εργασίας εξάγονται σε μερικά ξεχωριστά βιβλία εργασίας που ονομάζουν πρωτότυπα φύλλα σε ένα νέο συγκεκριμένο φάκελο. Δείτε στιγμιότυπα οθόνης:

έγγραφα εξαγωγής του εγγράφου 7

arrow μπλε δεξιά φούσκα Εξαγωγή και αποθήκευση φύλλων εργασίας ως νέο βιβλίο εργασίας με το Kutools για Excel

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

Kutools για το Excel, με περισσότερα από 300 εύχρηστες λειτουργίες, καθιστά την εργασία σας πιο εύκολη.

Μετά δωρεάν εγκατάσταση Kutools για το Excel, κάντε τα παρακάτω:

Βήμα 1: Κάντε κλικ στο κουμπί Kutools Περισσότερα > Βιβλίο εργασίας > Διαχωρισμένο βιβλίο εργασίας .... Δείτε το στιγμιότυπο οθόνης:
έγγραφα εξαγωγής του εγγράφου 3

Βήμα 2: Στο Διαχωρισμένο βιβλίο εργασίας , κάντε το παρακάτω:

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


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


3: και επίσης μπορείτε να ελέγξετε Καθορίστε την αποθήκευση και για να επιλέξετε το διαχωρισμό των φύλλων και, στη συνέχεια, να αποθηκεύσετε ως αρχείο κειμένου, αρχείο pdf ή csv αρχείο, σε περίπτωση που δεν ελέγξετε αυτή την επιλογή, θα διαιρέσει τα φύλλα και θα αποθηκευτεί ως βιβλίο εργασίας.

Βήμα 3: Στη συνέχεια κάντε κλικ στο κουμπί Σπλιτ και επιλέξτε το φάκελο στον οποίο θέλετε να βάλετε τα νέα βιβλία εργασίας. Δείτε το στιγμιότυπο οθόνης:
έγγραφα εξαγωγής του εγγράφου 6

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

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

arrow μπλε δεξιά φούσκα Εξαγωγή και αποθήκευση κάθε φύλλου ως νέου βιβλίου εργασίας


Καταργήστε γρήγορα τα δεδομένα σε πολλαπλά φύλλα εργασίας που βασίζονται σε στήλες ή σταθερές γραμμές στο Excel

Αν υποθέσουμε ότι έχετε ένα φύλλο εργασίας που περιέχει δεδομένα στις στήλες Α έως G, το όνομα του πωλητή βρίσκεται στη στήλη Α και πρέπει να χωρίσετε αυτόματα τα δεδομένα σε πολλά φύλλα εργασίας βάσει της στήλης Α στο ίδιο βιβλίο εργασίας και κάθε πωλητής θα χωριστεί σε νέο φύλλο εργασίας. Kutools για το Excel'S Ημερομηνία διαίρεσης βοηθητικό πρόγραμμα μπορεί να σας βοηθήσει να διαχωρίσετε γρήγορα τα δεδομένα σε πολλαπλά φύλλα εργασίας με βάση την επιλεγμένη στήλη όπως φαίνεται παρακάτω στο στιγμιότυπο του Excel. Κάντε κλικ για πλήρη δοκιμαστική δοκιμαστική περίοδο 60 δωρεάν!
τα δεδομένα διάσπασης του εγγράφου 2
Kutools για Excel: με περισσότερα από 300 εύχρηστα πρόσθετα του Excel, δωρεάν να δοκιμάσετε χωρίς περιορισμούς σε 60 ημέρες.

Σχετικά άρθρα:



Συνιστώμενα εργαλεία παραγωγικότητας

Καρτέλα Office

χρυσό star1 Φέρτε χρήσιμες καρτέλες στο Excel και άλλο λογισμικό του Office, όπως το Chrome, το Firefox και ο νέος Internet Explorer.

Kutools για το Excel

χρυσό star1Φοβερο! Αυξήστε την παραγωγικότητά σας σε λεπτά 5. Δεν χρειάζεστε ειδικές δεξιότητες, εκτός από δύο ώρες κάθε μέρα!

χρυσό star1300 Νέες δυνατότητες για Excel, Κάντε το Excel πολύ εύκολο και ισχυρό:

  • Συγχώνευση κελιών / σειρών / στηλών χωρίς απώλεια δεδομένων.
  • Συνδυασμός και ενοποίηση πολλών φύλλων και βιβλίων εργασίας.
  • Συγκρίνετε Περιοχές, Αντιγραφή Πολλαπλών Εύρους, Μετατροπή Κειμένου σε Ημερομηνία, Μετατροπή μονάδας και νομίσματος.
  • Καταμέτρηση κατά Χρώματα, Υποσύνολα σελίδας, Σύνθετη Ταξινόμηση και Σούπερ Φίλτρο,
  • Περισσότερα Επιλογή / Εισαγωγή / Διαγραφή / Κείμενο / Μορφή / Σύνδεσμος / Σχόλιο / Βιβλία εργασίας / Φύλλα εργασίας Εργαλεία ...

Εικόνα του Kutools για το Excel

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    DAS · 2 years ago
    Your code worked for me... Thanks much!!!
  • To post as a guest, your comment is unpublished.
    Richard · 2 years ago
    Can we also export ALL (300+) sheets to html,
    this will help me a lot, the export to unified text is already helping but I need them in html, or no table borders for the cell differences
  • To post as a guest, your comment is unpublished.
    Madhav Mehendale · 3 years ago
    Out of the above three methods, I found the first method to be quite good having regard to the fact that I am a beginner & my work is not at all of the same magnitude like professionals. My sincere thanks for explaining the steps in simple and lucid manner.
  • To post as a guest, your comment is unpublished.
    Beth G · 3 years ago
    Run time error Method 'Copy of Object' worksheet' failed
  • To post as a guest, your comment is unpublished.
    Beth G · 3 years ago
    xWs.Copy -it is an error in my part what does it mean?