Note: The other languages of the website are Google-translated. Back to English
Σύνδεση  \/ 
x
or
x
Εγγραφή  \/ 
x

or

Πώς να χωρίσετε ένα έγγραφο του Word και να το αποθηκεύσετε ως ξεχωριστό αρχείο PDF;

Στο Word, μπορείτε να αποθηκεύσετε ολόκληρο το έγγραφο σε ένα αρχείο PDF, αλλά έχετε προσπαθήσει ποτέ να διαχωρίσετε το έγγραφο και, στη συνέχεια, να αποθηκεύσετε τις σελίδες ως ξεχωριστό αρχείο PDF; Σε αυτό το άρθρο, θα παρουσιάσω τις μεθόδους για την επίλυση αυτής της εργασίας γρήγορα.

Διαχωρίστε ένα έγγραφο του Word και αποθηκεύστε ως ξεχωριστό αρχείο PDF με VBA

Διαχωρίστε ένα έγγραφο του Word για να διαχωρίσετε τα αρχεία κατά σελίδες / επικεφαλίδα1 / διάλειμμα


Διαχωρίστε ένα έγγραφο του Word και αποθηκεύστε ως ξεχωριστό αρχείο PDF με VBA

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

1. Τύπος Alt + F11 πλήκτρα για ενεργοποίηση Microsoft Visual Basic για εφαρμογές παράθυρο.

2. κλικ Κύριο θέμα > Μονάδα μέτρησης, αντιγράψτε και επικολλήστε τον παρακάτω κώδικα στο Μονάδα μέτρησης παράθυρο.

VBA: Αποθηκεύστε το Word ως ξεχωριστό PDF

Sub SaveAsSeparatePDFs()
'UpdatebyExtendoffice20181120
    Dim I As Long
    Dim xDlg As FileDialog
    Dim xFolder As Variant
    Dim xStart, xEnd As Integer
    On Error GoTo lbl
    Set xDlg = Application.FileDialog(msoFileDialogFolderPicker)
    If xDlg.Show <> -1 Then Exit Sub
    xFolder = xDlg.SelectedItems(1)
    xStart = CInt(InputBox("Start Page", "KuTools for Word"))
    xEnd = CInt(InputBox("End Page:", "KuTools for Word"))
    If xStart <= xEnd Then
        For I = xStart To xEnd
            ActiveDocument.ExportAsFixedFormat OutputFileName:= _
                xFolder & "\Page_" & I & ".pdf", ExportFormat:=wdExportFormatPDF, _
                OpenAfterExport:=False, OptimizeFor:=wdExportOptimizeForPrint, Range:= _
                wdExportFromTo, From:=I, To:=I, Item:=wdExportDocumentContent, _
                IncludeDocProps:=False, KeepIRM:=False, CreateBookmarks:= _
                wdExportCreateHeadingBookmarks, DocStructureTags:=True, _
                BitmapMissingFonts:=False, UseISO19005_1:=False
        Next
    End If
    Exit Sub
lbl:
    MsgBox "Enter right page number", vbInformation, "KuTools for Word"
End Sub

3. Τύπος F5 κλειδί, στο παράθυρο διαλόγου Αναζήτηση, επιλέξτε ένα φάκελο για να τοποθετήσετε τα αρχεία PDF.
doc split save pdf 1

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

doc split save pdf 2 doc split save pdf 3


5. κλικ OK. Τώρα οι σελίδες έχουν αποθηκευτεί ως ξεχωριστά αρχεία PDF.
doc split save pdf 4


Διαχωρίστε ένα έγγραφο του Word για να διαχωρίσετε τα αρχεία κατά σελίδες / επικεφαλίδα1 / διάλειμμα

Εάν θέλετε απλώς να διαχωρίσετε ένα έγγραφο του Word για να διαχωρίσετε το αρχείο Word, μπορείτε να το δοκιμάσετε Kutools για το Word'S Σπλιτ βοηθητικό πρόγραμμα, μπορεί να χωρίσει ένα έγγραφο με τίτλο1, αλλαγή σελίδας, αλλαγή ενότητας ή σελίδες όπως χρειάζεστε.

Kutools για το Word, με περισσότερα από 100 εύχρηστες λειτουργίες, διευκολύνει τις εργασίες σας. 

Μετά την εγκατάσταση Kutools για Word, κάντε τα παρακάτω:(Δωρεάν λήψη Kutools για το Word Now!)

1. κλικ Kutools Plus > Σπλιτ.
doc split save pdf 5

2. Στο Διαχωρισμός εγγράφου διαλόγου, επιλέξτε ένα φάκελο για να τοποθετήσετε τα έγγραφα και επιλέξτε τον τύπο από τον οποίο θέλετε να διαχωρίσετε Διαχωρισμός από Αναπτυσσόμενη λίστα.
doc split save pdf 6

3. κλικ OK. τότε ο φάκελος θα ανοίξει αυτόματα μετά το διαχωρισμό. Τώρα το έγγραφο έχει χωριστεί σε πολλά έγγραφα.
doc split save pdf 7


Περιήγηση με καρτέλες και επεξεργασία πολλών εγγράφων Word / βιβλίων εργασίας Excel όπως Firefox, Chrome, Internet Explore 10!

Ίσως εξοικειωθείτε με την προβολή πολλών ιστοσελίδων στο Firefox / Chrome / IE και εναλλαγή μεταξύ τους κάνοντας κλικ στις αντίστοιχες καρτέλες εύκολα. Εδώ, το Office Tab υποστηρίζει παρόμοια επεξεργασία, η οποία σας επιτρέπει να περιηγηθείτε σε πολλά έγγραφα του Word ή σε βιβλία εργασίας του Excel σε ένα παράθυρο του Word ή σε ένα παράθυρο του Excel και να κάνετε εναλλαγή μεταξύ τους εύκολα κάνοντας κλικ στις καρτέλες τους.
Κάντε κλικ για δωρεάν δοκιμή του Office Tab!

Περιηγηθείτε σε έγγραφα πολλών λέξεων σε ένα παράθυρο ως Firefox


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

 

Kutools For Word - Περισσότερες από 100 προηγμένες δυνατότητες για το Word, εξοικονομήστε χρόνο 50%

  • Περίπλοκες και επαναλαμβανόμενες λειτουργίες μπορούν να γίνουν μία φορά επεξεργασία σε δευτερόλεπτα.
  • Εισαγάγετε πολλές εικόνες στους φακέλους στο έγγραφο του Word ταυτόχρονα.
  • Συγχώνευση και συνδυασμός πολλαπλών αρχείων Word σε όλους τους φακέλους σε ένα με την επιθυμητή σειρά.
  • Διαχωρίστε το τρέχον έγγραφο σε ξεχωριστά έγγραφα σύμφωνα με την επικεφαλίδα, το τμήμα αλλαγής ή άλλα κριτήρια.
  • Μετατροπή αρχείων μεταξύ Doc και Docx, Docx και PDF, συλλογή εργαλείων για κοινές μετατροπές και επιλογή και ούτω καθεξής ...

Say something here...
symbols left.
You are guest
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.
    D A · 5 days ago
    Please kindly explain : (Renaming doc) You could do this using the REN function if you open the CMD in the folder with the documents saved - and also 2 pages docs into one pdf
  • To post as a guest, your comment is unpublished.
    mfadlihr · 20 days ago
    Instead of saving each page as a separate document, how do I get the code to save every 2 or 3 pages as a separate document.
    • To post as a guest, your comment is unpublished.
      Sunny · 3 days ago
      Can't find the code to handle your job now. Try the Kutools for Word, it is free for using in 60 days
  • To post as a guest, your comment is unpublished.
    amarquette13 · 1 months ago
    OMG, you saved my life. I always need to do merge letters in word and then save each one individually in PDF. My last 40 letters was so fast!!! :)
  • To post as a guest, your comment is unpublished.
    jgall7804 · 1 months ago
    is there a way to name the files from text in the document instead of page 1, page 2 ,etc?
    • To post as a guest, your comment is unpublished.
      Becky · 1 months ago
      You could do this using the REN function if you open the CMD in the folder with the documents saved
    • To post as a guest, your comment is unpublished.
      Sunny · 1 months ago
      Sorry I have no idea.
  • To post as a guest, your comment is unpublished.
    Nico · 2 months ago
    VBA code does not work. Keeps saying "enter right page number. Word document is 3 pages long. I added in 1 and 3 in the messageboxes and got the error.
    • To post as a guest, your comment is unpublished.
      Sunny · 1 months ago
      Hi, Nico, I have try the code again, it works in my version window 10 64 2016, which version you use?