word里如何做多个目录

1.word2007如何建两个目录?

正常的目录比较容易，提前设置好标题就能生成。但是图片、表格目录，就要麻烦一些了，要用插入题注的方式来生成。

目录：

word的目录制作一般经过2个步骤：1、先设置word内容的标题：单击进入大纲视图→设置一级标题、二级标题，只需将光标点到标题行（每个标题均分别单击），然后提升标题，降级标题，逐个设置好了。再生成目录。 弄好了，前换到页面视图 。如果有的标题的字体、字号、行距不符合要求，最好切换到大纲视图选择显示级别到最低标题级别，然后直接看标题修改即可，这样最快捷。2、然后插入引用→索引和目录→目录，选择一种格式。剩下的就没有问题了。

图目录：

先对每个图片，插入题注，要新增加一个“ 图”，默认的是图表，用图这个去生成。

逐个的弄好了，再插入--引用--图 目录。

大侠在线 联系邮箱358725389@qq.com（账号满员，不加好友）

2012年6月16日

2.如何多个word文档做一个目录

设置方法：一、设置标题格式1、选中文章中的所有一级标题；2、单击开始选项卡上的标题1，如图所示；仿照步骤1、2设置二、三级标题格式为标题2、标题3。

二、自动生成目录1、把光标定位到需要插入目录的位置；2、单击引用---->目录---->插入目录，如图所示；3、弹出目录对话框，选择目录选项卡，进行相关设置后，单击“确定”按钮，文章的目录自动生成完成；三、插入第二个目录1、把光标定位到需要插入目录的位置；2、单击引用---->目录---->插入目录；3、弹出提示框，单击“否”按钮即可，如图所示。

3.如何在WORD建立多个自动生成目录

目录不就是生成一个麽，先把标题的格式选好，单击插入-引用-索引和目录

--1.在[格式]中选[样式与格式]

--2.出现右边的一条“样式格式”栏，这里面主要就是用到标题1，标题2，标题3。把标题1，标题2，标题3分别应用到文中各个章节的标题上，设置成功后的标题前会出现一黑色小点。

--3.当然标题1，标题2，标题3的属性（如字体大小，居中，加粗，等等）可以自行修改的。修改方法：右键点击“标题1”选“修改”，会弹出修改菜单，您可以根据自己的要求自行修改。

--4.当都定义好后，就可以生成目录了。把光标移到文章最开头你要插入目录的空白位置，选[插入]--[引用]--[索引和目录]------5.选第二个选项卡[目录]，然后点右下的确定。

⊙阅读查找内容

方法：只要按住Ctrl点击目录中的某一章节就会直接跳转到该页

⊙如需再修改文章内容， 更新一下目录就会重新把目录对应到相应的页码上去

方法：在目录区域内，点右键，选[更新域]

4.谁能告诉我在word里面怎么做多个子文件的目录

上千页的文档，Word处理起来确实不太顺手。

楼主对长篇大论的处理方法我认为是值得推崇的：每一篇子文档自成体系（有单独的目录），便于读者单独阅读。当多个子文档具有关联性时，将它们的目录合成一个“总目录”，让读者打开总目录文档，根据需要跳转到对应子文档，更人性化的是，跳转到此子文档后，还要自动定位到相应的目录下。

楼主的要求是能够做到的，可以使用宏来处理。

处理思路为：将所有子文档和“总目录文档”都置于相同文件夹中。再新建一个空白文档作目录中转之用，将子文档的目录复制到此“中转文档”中，通过宏代码来自动修改目录中含有的超链接，再将处理过的目录复制到“总目录”中。如此处理完每一个子文档形成的“总目录”就可直接通过单击目录跳转到“对应文档的对应章节”中了。

不能忽略的一个细节是，这个文件夹被移动后，原来总目录中保存的链接就可能会因此失效，所以，总目录文档应该通过宏代码实现每次打开时自动处理文件路径的变化。

接下来这一段代码为“中转处理目录”之用，新建一个宏，将代码复制其中，执行此宏即可自动修改该文档中的目录链接，处理后的链接可以复制到“总目录”文档中使用了。

'这是需要复制的代码

'批量修改目录链接

On Error GoTo handerr

Dim FileStr As String

Dim Str1 As String

Dim i As Integer

Str1 = "请输入该目录所在的文档名：" & vbCrLf & "文档名称应包含后缀名，如：黄帝内经.doc"

FileStr = InputBox(Str1， "文档名称")

FileStr = ThisDocument.Path & "\" & FileStr

'目标文档须与本中转处理文档处于相同目录是便于提取文件路径

If Dir(FileStr, vbDirectory) = "" Then

MsgBox "输入的文档名有误，或与本文档不在同一文件夹中，操作被取消！"， vbInformation， "提示"

Exit Sub

End If

'修改链接

With ThisDocument

For i = 1 To .Hyperlinks.Count

.Hyperlinks(i).Address = FileStr & .Hyperlinks(i).Address

Next i

End With

MsgBox "目录已经全部更新，可以复制到总目录中使用了。"， vbInformation， "提示"

Exit Sub

handerr:

MsgBox Err.Description, vbInformation， "错误提示"

'上面是需要复制的代码

'-----------------------------------------------------------------------------------------------------------------------------

'如果您认为我提供的思路和方法都可行，请发追问，愿补齐“总目录文档”自动处理路径变化的代码。