Note: The other languages of the website are Google-translated. Back to English
登陆  \/ 
x
or
x
点此注册  \/ 
x

or

如何拆分Word文档并另存为单独的PDF文件?

在Word中,您可以将整个文档保存为PDF文件,但是您是否曾经尝试过拆分文档,然后将页面另存为单独的PDF文件? 在本文中,我将介绍快速解决此问题的方法。

拆分Word文档并使用VBA另存为单独的PDF文件

将Word文档拆分为按页/标题/分隔符分隔的文件


拆分Word文档并使用VBA另存为单独的PDF文件

这里的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拆分保存pdf 1

4。 点击 OK,然后输入要分割开始和结束的页码。

doc拆分保存pdf 2 doc拆分保存pdf 3


5。 点击 OK。 现在,页面已另存为单独的PDF文件。
doc拆分保存pdf 4


将Word文档拆分为按页/标题/分隔符分隔的文件

如果您只想将Word文档拆分为单独的Word文件,则可以尝试 Kutools for Word分裂 实用程序,它可以根据需要按标题1,分页符,分节符或页面拆分文档。

Kutools for Word, 与超过 100 方便的功能,使您的工作更加轻松。 

安装后 Kutools for Word,请执行以下操作:(现在免费下载Kutools for Word!)

1。 点击 Kutools Plus > 分裂.
doc拆分保存pdf 5

2。 在里面 分割文件 对话框中,选择一个文件夹放置文档,然后选择要从中拆分的一种类型 分割为 下拉列表。
doc拆分保存pdf 6

3。 点击 OK。 分割后该文件夹将自动打开。 现在,该文档已拆分为多个文档。
doc拆分保存pdf 7


分页浏览和编辑多个Word文档/ Excel工作簿,如Firefox,Chrome,Internet Explore 10!

您可能很熟悉在Firefox / Chrome / IE中查看多个网页,并通过轻松单击相应的选项卡在它们之间进行切换。 在这里,Office选项卡支持类似的处理,使您可以在一个Word窗口或Excel窗口中浏览多个Word文档或Excel工作簿,并通过单击它们的选项卡轻松地在它们之间进行切换。
单击免费试用Office选项卡!

使用Firefox在一个窗口中浏览多个Word文档


推荐的Word生产力工具

 

Kutools For Word-Word超过100种高级功能,可节省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 · 12 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 · 26 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 · 10 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?