Word把题注序号图一1变成图11.docx

上传人:b****3 文档编号:24777883 上传时间:2023-06-01 格式:DOCX 页数:11 大小:295.53KB
下载 相关 举报
Word把题注序号图一1变成图11.docx_第1页
第1页 / 共11页
Word把题注序号图一1变成图11.docx_第2页
第2页 / 共11页
Word把题注序号图一1变成图11.docx_第3页
第3页 / 共11页
Word把题注序号图一1变成图11.docx_第4页
第4页 / 共11页
Word把题注序号图一1变成图11.docx_第5页
第5页 / 共11页
点击查看更多>>
下载资源
资源描述

Word把题注序号图一1变成图11.docx

《Word把题注序号图一1变成图11.docx》由会员分享,可在线阅读,更多相关《Word把题注序号图一1变成图11.docx(11页珍藏版)》请在冰豆网上搜索。

Word把题注序号图一1变成图11.docx

Word把题注序号图一1变成图11

Word把题注序号图一.1变成图1.1及3.2(a)3.2(b)这种题注的实现(转)

Contents

 

方法一:

通过两次修改编号类型,最后一次全部处理(缺点:

如果不是最后打印的时候用的话,会一直显示为图一.1)

按正常的方法设置,题注显示图一.1就显示吧,先不管,等文章完成以后,把章编号给改回到数字编号,全选,按F9更新域,再把章编号改为中文编号,OK,搞定!

不过下次打开或更新域的时候还是会变为图一.1,在我的机器上连打印都会更新域,简直就是失败啊!

不过,如果你确实你的文章不会有任何变动,记住是任何变动,你可以把域变成文本,通过Ctrl+Shift+F9实现。

此命令很危险,过程不可逆,所以一定要慎重啊!

方法二:

通过变态设置多级编号实现(缺点:

设置麻烦点,要损失“标题1”样式和第9级编号,每章标题后要添加样式分隔符)

通过变态设置多级编号实现还是两种方法的:

a).牺牲“第9级编号”

1.新建一个样式,样式基准设为“标题一”,姑且命名为“CN_chapter”吧;

2.定义多级编号,将第1级链接到刚才创建的样式“CN_chapter”;

3.第2级编号的起始编号设置为0,3-8级随便设置,记得要使用正规形式编号哦;

3.将第9级链接到“标题1”,在“输入编号的格式”的文本框中,将最后一个数字前面的所有内容都删掉,只留最后一个数字,“编号之后”选“不特别标注”,去掉“重新开始列表的间隔”上的勾,然后点击“字体”按钮,在弹出的对话框中选上“隐藏”复选框(一部分原因是因为不让它在目录中显示)。

设置好后如下图:

4.写文章的时候,每章的标题文字后面(不换行)插入一个样式分隔符(方法:

输入完标题后,按一个回车换行,再把光标移动到章标题的末尾,就是按一下键盘上的左箭头了,同时按下Ctrl+Alt+Enter,这时你会发现下面的空行没了,这就对了!

),是每一章的标题都要这样设置一下;

5.选中样式分隔符后的文字(如果做完第4部以后,你没有移动过光标的话,按住Shift再按一下键盘上的左箭头就选中了,其实就是一个空格,千万别选到下一行了!

),然后应用样式“标题1”。

6.插图时使用插入题注功能,包含章节号,章节起始样式选择“标题1”,这样就搞定了!

b).牺牲“标题1”

1.设置多级编号,第1级链接到“标题1”,每级都要分别链接到对应的标题样式;

2.第2级把编号改为中文编号,把“输入编号的格式”中把第一层的1.删除;

3.第3-4级设置的时候,同样把“输入编号的格式”中把第一层的1.删除,同时要勾选“正规形式编号”,当然,你用到第几级就设置到第几级就好了,不一定是4.设置好后如下图;

4.在每一章的标题后面加上一个空行,并应用“标题1”样式,然后将将“标题1”样式的字体设置为隐藏;

5.对相应的标题应用相应的样式,不过记住,每级标题要应用的样式要加上一,就是说,1级标题要用“标题2”,2级标题要用“标题3”等;

6.插入题注的时候,章节起始样式选择“标题1”,如下图

7.送一个小的tips,如果你有的章节不想编号的号,只要把章标题选中,点击

即可;

方法三:

通过添加quote或set域及修改相应域实现(缺点:

操作最麻烦,不过如果使用VBA版的,将会是最理想的选择)

a).使用手工添加和修改域(使用图文集或设置快捷键)

1.按一般方法设置多级编号;

2.随便在一个word文件中,也可以新建一个,敲下面两段代码的中一段,注意成对大括号{}全是由Ctrl+F9产生的,用键盘输的没用!

并设置好样式。

图{QUOTE"一九一一年一月{STYLEREF1\s}日"\@"D"}.{SEQ图\*ARABIC\s1}

图{SETmyBK"一九一一年一月{STYLEREF1\s}日"}{myBK\@"D"}.{SEQ图\*ARABIC\s1}

如果在设置中让显示域的话,输入后的效果如图所示,其中居中的点代表空格(你要是细心的话,可能会注意到我用的是“M”而不是“D”,那是因为我用的是英文版,你是中文版就用“D”吧)。

3.全选上段代码,然后按组合键“alt+F3”,用意就是把这段代码保存为自动图文集,这时会出现对话框,让你敲你这段代码的名称。

我用“图注”来命名。

如下图

4.将光标移动到你想要插入图1.1的地方,点击“插入-自动图文集-图注”,就可以插入图1.2等了,然后输入标题即可。

你可以在视图中把自动图文集放在快捷菜单上或设置快捷键,这样更方便,具体如何操作请自己学习。

如果你喜欢的话,直接复制粘贴也是可以的。

5.这种方法也可以实现形如图3.3(a),图3.3(b)这种形式的命名,请参考如下代码

图{QUOTE"一九一一年一月{STYLEREF1\s}日"\@"D"}.{SEQ图\*ARABIC\s1}{SEQ菜\*alphabetic\s1}

图{QUOTE"一九一一年一月{STYLEREF1\s}日"\@"D"}.{SEQ图\c\*ARABIC\s1}{SEQ菜\*alphabetic\s1}

6.同理,你的表格一.1,表格1x1等,你想怎么改都行。

表1x1,你把第一步中两个中括号之间的点改成x,最前面的汉字改成表,就行了。

当然你可以改成菜,哈哈。

b).通过查找替换统一解决

1.按一般方法设置多级编号及插入题注,题注显示的是图一.1,显示就让它显示吧,后面一次性全部处理;

2.当你图全插完后,图注也已经写好时,在正文中,按下ALT+F9,切换到域代码视图下(域的查找与替换,必须在显示域代码的情况下进行)

3.随便在一个word文件中,也可以新建一个,敲下面两段代码的中一段,注意成对大括号{}全是由Ctrl+F9产生的,用键盘输的没用!

并设置好样式(这样方便统一修改)。

图{QUOTE"一九一一年一月{STYLEREF1\s}日"\@"D"}.{SEQ图\*ARABIC\s1}

图{SETmyBK"一九一一年一月{STYLEREF1\s}日"}{myBK\@"D"}.{SEQ图\*ARABIC\s1}

4.如果在设置中让显示域的话,输入后的效果如图所示,其中居中的点代表空格(你要是细心的话,可能会注意到我用的是“M”而不是“D”,那是因为我用的是英文版,你是中文版就用“D”吧)。

5.全选上段代码,复制,按下CTRL+H组合键,打开查找和替换对话框,在替换选项卡中,设置查找内容为“^dSTYLEREF1\s”,在替换为中输入“^c”,不区分大小写,注意,“^d”后有一个半角空格,全部替换即可。

6.然后按Alt+F9,全选,再按F9,图注是不是都正确了?

c).使用VBA版的,这是最理想了!

1.按一般方法设置多级编号;

2.按Alt+F11,打开VBE窗口如下:

3.选择插入|模块;

4.按下面的内容复制到窗口中;

SubInsertCaption()

DimZH1AsString,ZH2AsString

DimTHAsString

Selection.TypeText"图"

ZH1="QUOTE""一九一一年一月日""\@""D"""

Selection.Fields.AddRange:

=Selection.Range,PreserveFormatting:

=False,Text:

=ZH1

Selection.EndKey

ActiveWindow.View.ShowFieldCodes=True

Selection.MoveLeft,11

ZH2="STYLEREF1\s"

Selection.Fields.AddRange:

=Selection.Range,PreserveFormatting:

=False,Text:

=ZH2

Selection.EndKey

Selection.TypeText"-"

TH="SEQ图\*ARABIC\s1"

Selection.Fields.AddRange:

=Selection.Range,PreserveFormatting:

=False,Text:

=TH

ActiveWindow.View.ShowFieldCodes=False

Selection.WholeStory

Selection.Fields.Update

EndSub

5.完成后如下图:

6.选择“文件|关闭并返回到Word”;

7.将光标定位到要插入图x.x的地方,03版的点插入|引用|题注,07和10版的在引用面板中,点插入题注即可以达到目的;

8.用以上方法的话,你只需要一次把代码放到文档中,以后这个文档直接插入题注即可,方便实用啊,强烈推荐!

方法四:

通过插入seq域,再用查找替换相应域来实现(缺点:

操作麻烦,第章标题都要插入一个域)

1.在每一章开始位置插入域代码{SEQseq\h}。

其中大括号{}不是用键盘上的{}输入的,而是按Ctrl+F9,手工输入的无效!

注意中间的空格(应该为{空格SEQ空格seq空格\h空格})

2.在每一次执行插入图片后要插入题注时:

首先用word自动插入带章节号的题注,可能是这样图三-2,不管如何一定要先接受它(即使图2-2变回了图二-2,别灰心,按下面操作),先忍受word的编号,等所有图片都插完后再执行下面的操作:

3.按Alt+F9切换成域代码模式;

4.随便在一个word文件中,也可以新建一个,输入下面一段的代码,具体形式为“{空格SEQ空格seq空格\c空格}”,注意成对大括号{}全是由Ctrl+F9产生的,用键盘输的没用!

{SEQseq\c}

5.复制刚才生成的“{SEQseq\c}”;

6.按Ctrl+H,设置查找内容为“^dSTYLEREF1\s”,在替换为中输入“^c”,不区分大小写,注意,“^d”后有一个半角空格,全部替换即可。

7.按Alt+F9这样就退出了域代码模式,然后按Ctrl+A全选,按F9更新域即可。

方法五:

为每一章设置一个标签(缺点:

如果一旦有章节变动,想像一下)

这个操作很简单,在添加题注的时候,新建一个标签,如“图1-”、“图2-”……,看似很简单,但是如果,如果在第三章与第四章之间加入新的一章你该怎么办呢?

让我想想,或许你可以用查找替换解决。

菜鸟的话,也推荐使用。

方法六:

使用MathType的编号功能(缺点:

同时有公式需要编号的时候无法使用)

如果你装了MathType,而且文章中不出现公式(这两个条件似乎极少同时出现,要不你为什么要装MathType?

),那就可以用这种方法。

在每一章标题后点击鼠标,然后如下图所示选MathType->"Chapters&Sections"->"InsertNextSectionBreak"

选MathType->InsertNumber->Format设置自己需要的格式

需要插题注时,先用word随便插一个,然后将word自动加的编号删除,自己加编号:

点击MatyType->InsertNumber

当然,如果文档中要插入公式,那这种方式就会将图片与公式混合编号,这种情况还是考虑其它解决方案吧。

展开阅读全文
相关资源
猜你喜欢
相关搜索

当前位置:首页 > 解决方案 > 工作计划

copyright@ 2008-2022 冰豆网网站版权所有

经营许可证编号:鄂ICP备2022015515号-1