参考文献必须要以[1]、[2]....格式开头，怎么样能快速的将其添上，

geology

参考文献必须要以[1]、[2]格式....开头，怎么样能快速的将其添上，一共45篇参考文献，

一个一个添加绝对要比较慢，请高手指点，先谢谢。

konggs

自定义编号

[此贴子已经被作者于2005-6-9 19:46:32编辑过]

sdbbsdbb

我的思路是，

一、你先将需要添加1]、[2格式开头的那45行（应该是段）内容先复制到一个新文件。

二、对如下程式进行修改，就能达到楼主的目标了，但那一行东东我现在无法编，资料在家中，手头没货；守老大出差，何时回来不知；另几位高手何时上线，同样不可知。楼　主还是等等吧。。。。。。

For Each i In ActiveDocument.Paragraphs '在活动文档的段落中循环 x=x+1

'下面一段内容我不会做了，应该是在各段之前加上"[" & X & "]、" 内容的，可惜我不会做了。。。。。。

Next i

sdbbsdbb

收回我的观点，还是用WORD自身的功能方便啊，远比VBA省事

youyou300

给个意见：

如果你这45篇文献已经是分段落输入的，就全部选中，将文本转换成表格。

然后将表格分成两列，左列空出。

然后将左侧空列进行项目编号，使用自动的形式。编号形式使用你需要的形式就可以了。

然后，再全部选中表格，选择表格转换成文本就可以了。

如意

以下是引用geology在2005-6-9 19:34:00的发言：

参考文献必须要以[1]、[2]格式....开头，怎么样能快速的将其添上，一共45篇参考文献，

一个一个添加绝对要比较慢，请高手指点，先谢谢。

楼主的问题中有以下两点根本就没说明白。

1、你的这45篇参考文献是45篇文章呢，还是这45篇文章是合在一起的一个文档，或者只是45篇文章的标题。

2、你要加编号的这45个文献，是只给它们的标题加编号呢，还是给它们的存储时用的名字加编号。

以上两点不同的答案会有不同的操作方法，请楼主先说清具体要求。

守柔

以下是引用sdbbsdbb在2005-6-9 19:50:00的发言：

For Each i In ActiveDocument.Paragraphs '在活动文档的段落中循环 x=x+1

'下面一段内容我不会做了，应该是在各段之前加上"[" & X & "]、" 内容的，可惜我不会做了。。。。。。

Next i

步兵兄：您枉看了我很多代码了，这么简单的问题，还是不会，守柔有些心痛啊！

这是一个很古老的贴子了，你参考一下

http://club.excelhome.net/dispbb ... id=60333&skin=0

在WORD中，要理解insertafter,insertbefore！是非常有用的。

以上只是就事论事，与楼主问题无关。

sdbbsdbb

对不起，我的命令实在记不住，只好依靠PDA，昨天PDA用光了电池。。。。。

sdbbsdbb

另外，如意MM，楼主的要求应该是这样的，我替他（她）讲全吧！

一篇论文（报告、学术材料），在未尾必须列出所参考的文献资料的名称、章节、出版的时间等资料，以证明本文章仅仅是参考而不是抄袭。

而为了美观，在这几十篇文章名字之前需加一个醒目的标识，因此，楼主提出了这个问题

不知是不是这样？

ybird

2楼的方法最简单！