该方法虽然很方便，但在格式上稍有欠缺。因为一些杂志要求参考文献的序号必须加方括号，一来美观二来醒目。如果用原来介绍的方法，则需手动为各个参考文献加入方括号，这样既费力又麻烦。好在我们生活在牛人辈出的网络时代！今天给大家介绍两种在word中编辑参考文献的方法。 第一种方法，衍生自word脚注或者尾注编辑参考文献。 它就是由苏卫国同学编写的一个小工具，利用该工具可以便捷插入方括号格式脚注或者尾注，同时可以实现脚注或者尾注格式的双向的批量转换。即将原有文档注释加上方括号,或舍弃方括号的形式。该工具只有60k大小，安装后再编辑参考文献变得一劳永逸了。 不过使用过程中发现该工具在交叉应用时，仍需手动加方括号，我想这是作者考虑了一处地方引用多篇文章时的麻烦吧！有需要该工具的可以留下自己的email。 第二种方法，采用题注的方法编辑参考文献。 该方法需先将所有参考文献罗列出来，并在题注中建立一个自定义的项目，如“参考文献”，然后给每条罗列的参考文献前面插入该题注。在文章中需要引用时只要用交叉引用便可以了。如果要给所有参考文献批量加入方括号，需要借助Word宏。 具体操作办法是：先按照上述方法给所有罗列的参考文献前加入题注，并选中所有参考文献，最后选择：‘工具’》‘宏’》 ‘宏’单击编辑，并粘贴以上代码运行即可。注：该宏适用于office2003。"叁考文献" 题注前添加[]的宏代码：Sub AddMarkRef()'AddMarkRef Macro Dim parag As Paragraph Dim selRge As Range Dim rge As Range Dim nField As Integer Dim nParag As Integer Set selRge = SRange MsgBox "你确定已经正确的选择参考文献了吗 ?" ActiveDActiveWVFieldShading = wdFieldShadingWhenSelected For nParag = 1 To selRPCount Set rge = selRParagraphs(nParag)Range Select nField = SFCount For i = 1 To nField Select If SFCount >= 1 Then With SFields(i) Update Select End With SCut SInsertBefore ("[") SCollapse Direction:=wdCollapseEnd SPaste SInsertAfter ("] ") End If Next i Next nParag End Sub 我个人强烈推荐大家用第一种方法，因为简单实用，对于一般使用word的人来说运行宏代码太麻烦了。 欢迎大家讨论，不清楚的地方可以留言。2009年更新：苏卫国的小插件已经上传到skydrive，喜欢的朋友手动下载吧！
么么哒狂人
