當前位置:首頁 » 激光切割 » 如何快速切割word文檔

如何快速切割word文檔

發布時間: 2021-02-21 21:48:19

① 如何將一個word文檔按2頁分割成多個word文檔

1.
這個必須用到大綱視抄圖;
2.
第一步:在第一、第三、第五...等每個兩頁的最頂端設置一個一級標題;
3.
第二步:ctrl+alt+o(歐)切換到大綱視圖→顯示級別選擇1級→點擊「顯示文檔」→點擊「創建」→ctrl+s保存;
4.
完成,保存後的子文檔位於主文檔文件夾內;

② 如何將一個word文檔分割成多個word文檔

Word2007中把游標定位在要分割文檔的位置——插入——頁——分頁即可。

③ word文檔太大,如何分割

沒有找到直接分割word文件的工具。可不可以這樣,先將word文件轉為pdf文件,分割pdf文件的工具有不少

④ 怎麼將word按頁面分割為幾個文檔

1、在Word裡面打開那個需要分割的文檔(假設它的文件名叫做「原始文檔.doc」);
鍵入ALT+F11打開VBA編輯器,選擇菜單「插入-模塊」;
粘貼下面的代碼:
Option Explicit

Sub SplitPagesAsDocuments()

Dim oSrcDoc As Document, oNewDoc As Document
Dim strSrcName As String, strNewName As String
Dim oRange As Range
Dim nIndex As Integer
Dim fso As Object

Set fso = CreateObject("Scripting.FileSystemObject")
Set oSrcDoc = ActiveDocument
Set oRange = oSrcDoc.Content

oRange.Collapse wdCollapseStart
oRange.Select

For nIndex = 1 To ActiveDocument.Content.Information(wdNumberOfPagesInDocument)
oSrcDoc.Bookmarks("\page").Range.Copy
oSrcDoc.Windows(1).Activate
Application.Browser.Target = wdBrowsePage
Application.Browser.Next

strSrcName = oSrcDoc.FullName
strNewName = fso.BuildPath(fso.GetParentFolderName(strSrcName), _
fso.GetBaseName(strSrcName) & "_" & nIndex & "." & fso.GetExtensionName(strSrcName))
Set oNewDoc = Documents.Add
Selection.Paste
oNewDoc.SaveAs strNewName
oNewDoc.Close False
Next

Set oNewDoc = Nothing
Set oRange = Nothing
Set oSrcDoc = Nothing
Set fso = Nothing

MsgBox "結束!"

End Sub
鍵入F5運行,看到「完成!」結束。
2、檢查當前文檔所在路徑下是否生成若干名為「原始文檔_n.doc」(n代表其對應原始文檔中的第幾頁)的文檔,檢查它們的內容是否就對應於原始文檔每個頁面的內容。
如文檔中有分節符分解後的文檔會出現空白頁,如要分解後不出現空白頁,需要把文檔中的分節符刪除。消除分節符的方法:
注意事項
分節符若全部替換,要注意替換後文檔可能會出現排版混亂,這則需要自己手動排版了。

⑤ 如何切割word文檔,把大的切割成多個小的,要有用,快捷,的方法,或者有關軟體也行,

1、在Word裡面打開那個需要分割的文檔(假設它的文件名叫做「原始文檔.doc」);
2、鍵入ALT+F11打開VBA編輯器,選擇菜單「插入-模塊」;
3、粘貼下面的代碼:
Option Explicit
Sub SplitPagesAsDocuments()
Dim oSrcDoc As Document, oNewDoc As Document Dim strSrcName As String, strNewName As String Dim oRange As Range Dim nIndex As Integer Dim fso As Object
Set fso = CreateObject("Scripting.FileSystemObject") Set oSrcDoc = ActiveDocument Set oRange = oSrcDoc.Content
oRange.Collapse wdCollapseStart oRange.Select
For nIndex = 1 To
ActiveDocument.Content.Information(wdNumberOfPagesInDocument) oSrcDoc.Bookmarks("\page").Range.Copy oSrcDoc.Windows(1).Activate
Application.Browser.Target = wdBrowsePage Application.Browser.Next
strSrcName = oSrcDoc.FullName
strNewName = fso.BuildPath(fso.GetParentFolderName(strSrcName), _ fso.GetBaseName(strSrcName) & "_" & nIndex & "." & fso.GetExtensionName(strSrcName)) Set oNewDoc = Documents.Add Selection.Paste
oNewDoc.SaveAs strNewName oNewDoc.Close False Next

Set oNewDoc = Nothing Set oRange = Nothing Set oSrcDoc = Nothing Set fso = Nothing
MsgBox "結束!" End Sub
4、鍵入F5運行,看到「完成!」結束。
5、檢查當前文檔所在路徑下是否生成若干名為「原始文檔_n.doc」(n代表其對應原始文檔中的第幾頁)的文檔,檢查它們的內容是否就對應於原始文檔每個頁面的內容。 Option Explicit
Sub SplitPagesAsDocuments()
Dim oSrcDoc As Document, oNewDoc As Document
Dim strSrcName As String, strNewName As String
Dim oRange As Range
Dim nIndex As Integer, nSubIndex As Integer, nTotalPages As Integer, nBound As Integer
Dim fso As Object
Const nSteps = 4
Set fso = CreateObject("Scripting.FileSystemObject")
Set oSrcDoc = ActiveDocument
Set oRange = oSrcDoc.Content
nTotalPages = ActiveDocument.Content.Information(wdNumberOfPagesInDocument)
oRange.Collapse wdCollapseStart oRange.Select
For nIndex = 1 To nTotalPages Step nSteps
Set oNewDoc = Documents.Add
If nIndex + nSteps > nTotalPages Then

nBound = nTotalPages Else
nBound = nIndex + nSteps - 1 End If
For nSubIndex = nIndex To nBound oSrcDoc.Activate
oSrcDoc.Bookmarks("\page").Range.Copy oSrcDoc.Windows(1).Activate
Application.Browser.Target = wdBrowsePage Application.Browser.Next
oNewDoc.Activate
oNewDoc.Windows(1).Selection.Paste Next nSubIndex
strSrcName = oSrcDoc.FullName strSrcName = oSrcDoc.FullName
strNewName = fso.BuildPath(fso.GetParentFolderName(strSrcName), _
fso.GetBaseName(strSrcName) & "_" & nIndex & "." & fso.GetExtensionName(strSrcName))

oNewDoc.SaveAs strNewName oNewDoc.Close False Next nIndex
Set oNewDoc = Nothing Set oRange = Nothing Set oSrcDoc = Nothing Set fso = Nothing
MsgBox "結束!" End Sub

⑥ 怎麼把word文檔中的一整個頁面剪切下來

文件

另存為

保存類型:網頁

保存
這樣你保存的目錄下會同時生成一個文件夾,裡面保存著文檔中的所有圖片;這是常用的提取文檔中的圖片的方法。

⑦ 如何將一個word文檔按頁分割成多個word文檔

  1. 這個得用大綱視圖;

  2. 在切換視圖之前,先將每頁的首行設置為一級標題;

  3. 然後切換到大綱視圖→顯示文檔→創建;

  4. 最後,點擊保存,子文檔就保存在主文檔所在的文件夾;

熱點內容
線切割怎麼導圖 發布:2021-03-15 14:26:06 瀏覽:709
1台皮秒機器多少錢 發布:2021-03-15 14:25:49 瀏覽:623
焊接法蘭如何根據口徑配螺栓 發布:2021-03-15 14:24:39 瀏覽:883
印章雕刻機小型多少錢 發布:2021-03-15 14:22:33 瀏覽:395
切割機三五零木工貝片多少錢 發布:2021-03-15 14:22:30 瀏覽:432
加工盜磚片什麼櫸好 發布:2021-03-15 14:16:57 瀏覽:320
北洋機器局製造的銀元什麼樣 發布:2021-03-15 14:16:52 瀏覽:662
未來小七機器人怎麼更新 發布:2021-03-15 14:16:33 瀏覽:622
rexroth加工中心亂刀怎麼自動調整 發布:2021-03-15 14:15:05 瀏覽:450
機械鍵盤的鍵帽怎麼選 發布:2021-03-15 14:15:02 瀏覽:506