如何对电脑文件夹里的文件进行分级和分类？

电子文件的分类和纸质文件一样，简谨亩是将具有保存价值的电子文件，按照其自然联系组合成文件的组合体。传统文件分类体现在文件的实体排列上，而电子文件的分类则反映在计算机输出界面的逻辑排列上。

具体方法是：

1、双拦森击桌面上【我的电脑】或鼠标右击【开始】按钮选择【资源管理器】，便可进入资源管理器界面。单击选择一个存储器，如：“H盘”。在选择存储器时，要预先估计本单位电子文件的递增速度，让该存储器的容量能够满足电子文件递增的需要。同时，存储电子文件的文件夹不能选“C盘”，因为“C盘”容易受到病毒的攻击。

2、单击左上角【文件】按钮，晌凳再将鼠标移至【新建】→【文件夹】后单击。然后输入文件夹名，如【文书档案库】。这样建立的【文书档案库】文件夹就专门用于存放文书类电子文件。

3、根据本单位档案分类体系，反复采用上述第2种方法，就能按电子文件的分类层次设置文件夹。例如某单位行政类电子文件按年度、问题分类，其文件夹就可以设置为以下方式：

4、类别设置好后，将需要归档保存的电子文件按类存放入相应的文件夹中。

方法如下：

*** 作设备：戴尔笔记本电脑

*** 作系统：win10

*** 作程序：WPS文档2017

1、首先在打开的WPS文档页面打开两个文档，可以看到此时两个文档显示在一个窗口中。

2、然后，单击页面左上角的下拉菜单并选择“工具”选项。

3、然后单击“工具选项”菜单中的“选项”部分。

4、打开“选项”设掘袜置对话框，可以在左侧菜单栏中选择“视图”选项。

5、然后，在“视图”窗口中选择“在任务磨散喊栏中显示所有窗口瞎野”，并单击“确定”(OK)以拆分文档。

1. 如何快速把一个Word文档拆分数据分成两个文档

以WPS 2019版本为例：

如需把一个Word文档拆分，可使用清蚂WPS2019中已自带的「橘态文档拆分」功能：

*** 作步骤：

1）打开其中一份「文字（Word」文档；

2）点击「特色应用-拆分合并-拆分」；

3）点击添加需合并文件，设置合并文件需合并的页数范围即可将多个文档合并为一份。

2. 怎么把word文档一个分成两个文档 例如有三十页 分成各十五页的两个

可以这样，删除后面的15页后另存为前15页为一个文档，然后再打开原始文档，删除前15页再另存后15页为另一个文档。

也可以分别复制前后15页到新的文件里；

你这个要求相对简单，如果页数非常多，可用宏来解决，参考以下代码：

Sub SplitEveryFivePagesAsDocuments()

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 = 15 ' 修改这里圆正源控制每隔几页分割一次

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

strNewName = fso.BuildPath(fso.GetParentFolderName(strSrcName), _

fso.GetBaseName(strSrcName) &"_" &(nIndex \ nSteps + 1) &"." &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

3. 怎样把一个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代表其对应原始文档中的第几页)的文档，检查它们的内容是否就对应于原始文档每个页面的内容。

如文档中有分节符分解后的文档会出现空白页，如要分解后不出现空白页，需要把文档中的分节符删除。消除分节符的方法：

注意事项

分节符若全部替换，要注意替换后文档可能会出现排版混乱，这则需要自己手动排版了。

---