Note: The other languages of the website are Google-translated. Back to English
Đăng nhập  \/ 
x
or
x
Đăng ký  \/ 
x

or

Làm cách nào để chia nhỏ tài liệu Word và lưu dưới dạng tệp PDF riêng biệt?

Trong Word, bạn có thể lưu toàn bộ tài liệu vào một tệp PDF, nhưng bạn đã bao giờ thử chia nhỏ tài liệu và sau đó lưu các trang dưới dạng tệp PDF riêng biệt chưa? Trong bài viết này, tôi sẽ giới thiệu các phương pháp giải quyết công việc này một cách nhanh chóng.

Tách tài liệu Word và lưu dưới dạng tệp PDF riêng biệt với VBA

Tách tài liệu Word thành các tệp riêng biệt theo trang / tiêu đề1 / ngắt


Tách tài liệu Word và lưu dưới dạng tệp PDF riêng biệt với VBA

Ở đây mã VBA có thể giúp bạn chia trực tiếp tài liệu Word theo các trang sau đó lưu thành các tệp PDF riêng biệt.

1. nhấn Alt + F11 phím để kích hoạt Microsoft Visual Basic cho các ứng dụng cửa sổ.

2. nhấp chuột Chèn > Mô-đun, sao chép và dán mã bên dưới vào Mô-đun cửa sổ.

VBA: Lưu Word dưới dạng PDF riêng biệt

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. nhấn F5 , trong hộp thoại Duyệt qua, hãy chọn một thư mục để đặt các tệp PDF.
doc tách lưu pdf 1

4. nhấp chuột OK, sau đó nhập số trang bạn muốn phân chia bắt đầu và kết thúc.

doc tách lưu pdf 2 doc tách lưu pdf 3


5. nhấp chuột OK. Bây giờ các trang đã được lưu thành các tệp PDF riêng biệt.
doc tách lưu pdf 4


Tách tài liệu Word thành các tệp riêng biệt theo trang / tiêu đề1 / ngắt

Nếu bạn chỉ muốn chia tài liệu Word để tách tệp Word, bạn có thể thử Kutools cho Word'S chẻ tiện ích, nó có thể chia tài liệu theo tiêu đề 1, ngắt trang, ngắt phần hoặc các trang khi bạn cần.

Kutools cho Word, với hơn 100 chức năng tiện dụng, giúp công việc của bạn dễ dàng hơn. 

Sau khi cài đặt Kutools cho Word, vui lòng làm như dưới đây:(Tải xuống miễn phí Kutools cho Word ngay!)

1. nhấp chuột Kutools Plus > chẻ.
doc tách lưu pdf 5

2. bên trong Tách tài liệu hộp thoại, chọn một thư mục để đặt các tài liệu và chọn một loại bạn muốn tách Chia theo danh sách thả xuống.
doc tách lưu pdf 6

3. nhấp chuột OK. thì thư mục sẽ được mở tự động sau khi chia nhỏ. Bây giờ tài liệu đã được tách thành nhiều tài liệu.
doc tách lưu pdf 7


Duyệt theo tab & chỉnh sửa nhiều tài liệu Word / sổ làm việc Excel dưới dạng Firefox, Chrome, Internet Explore 10!

Có thể bạn đã quen với việc xem nhiều trang web trong Firefox / Chrome / IE và chuyển đổi giữa chúng bằng cách nhấp vào các tab tương ứng một cách dễ dàng. Ở đây, Tab Office hỗ trợ xử lý tương tự, cho phép bạn duyệt nhiều tài liệu Word hoặc sổ làm việc Excel trong một cửa sổ Word hoặc cửa sổ Excel và dễ dàng chuyển đổi giữa chúng bằng cách nhấp vào tab của chúng.
Nhấp để dùng thử Office Tab miễn phí!

Duyệt nhiều tài liệu từ trong một cửa sổ dưới dạng Firefox


Công cụ năng suất Word được đề xuất

 

Kutools cho Word - Hơn 100 tính năng nâng cao cho Word, tiết kiệm 50% thời gian của bạn

  • Các hoạt động phức tạp và lặp đi lặp lại có thể được thực hiện xử lý một lần trong vài giây.
  • Chèn nhiều hình ảnh trên các thư mục vào tài liệu Word cùng một lúc.
  • Hợp nhất và kết hợp nhiều tệp Word trên các thư mục thành một với thứ tự mong muốn của bạn.
  • Chia tài liệu hiện tại thành các tài liệu riêng biệt theo tiêu đề, ngắt phần hoặc các tiêu chí khác.
  • Chuyển đổi tệp giữa Doc và Docx, Docx và PDF, bộ sưu tập các công cụ để chuyển đổi và lựa chọn phổ biến, v.v.

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 · 8 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 · 22 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 · 5 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?