论文引用参考文献较多,为方便后期编辑和编号,可以结合Word中的域自动编号、批注功能快速完成。
1 首先在需要加标记的地方插入可以自动编号的域
如下图光标放在第一句话后面
添加域: word--插入--文档部件--域,选择seq,域代码改为 SEQ ref\#[0],
修改域格式:将[1]设为上标[1](选中[1]后,用快捷键Ctrl+Shift+‘=’)。
复制域:再将变成上标的 [1] 复制到其他需要标记的地方。效果如下有两处标记:
--在电力物资行业,仓储管理在物流行业以及整个经济活动中起着十分重要的作用,同时也是物流中最重要的组成部分[1]。仓库管理的主要目的是为了可以平衡仓库空间的利用以及库存货品的处理成本,而且它还是使仓库物流成本可以降低的一种重要的途径"[1]。
> 小提示:快速添加域,Word中按Ctrl+F9,出现域编辑标记{ },在{ }中输入{ SEQ ref\#[0] },再按F9,即可生成域[1]
更新域编号: 全选正文,右键更新域,自动编号完成。
--在电力物资行业,仓储管理在物流行业以及整个经济活动中起着十分重要的作用,同时也是物流中最重要的组成部分[1]。仓库管理的主要目的是为了可以平衡仓库空间的利用以及库存货品的处理成本,而且它还是使仓库物流成本可以降低的一种重要的途径"[2]。
2 对每个编号加批注
再次选中编号:[1],给[1]添加批注。批注内容为参考文献。
OK.就这样,需要加新的参考文献,把[1]复制过去就行了,然后批注上参考文献。随着文章的不断修改,编号变乱了也没关系,全选正文--右键--更新域,就自动编号了。
3 导出批注的参考文献
下面说怎样把参考文献按顺序导出来,放在论文最后。
使用 VBA 代码,可以快速将所有批注一次性全部导入新文档中。
按照以下步骤操作即可完成该任务。
1: 按 Alt+F11。会打开一个窗口 Microsoft Visual Basic for Applications ;
2: 单击“插入”菜单下的“模块”,将以下 VBA 代码复制粘贴到模块窗口中,点运行【快捷键F5】;
Sub exportcomments()
Rem Alt+F11 ,插入- 模块 -粘贴代码 - F5运行
Dim sList As String
Dim cmt As Word.Comment
Dim doc As Word.Document
For Each cmt In ActiveDocument.Comments
If InStr(cmt.Scope, "]") Then
sList = sList & "[" & cmt.Index & "]" & cmt.Range.Text & vbCr
End If
Next
Set doc = Documents.Add
doc.Range.Text = sList
End Sub
然后Office会自动新建一个文档,参考文献列表就在新的word文档了,复制出来粘到你文章的后面就行了。
[1]高源,安育欣.基于RFID技术的电力物资仓储管理系统设计[J].自动化与仪器仪表,2018(12):83-86.
[2]戴清杰,宋军奇,高燕.射频识别技术及其应用[J].通信与信息技术,2010(05):65-67+58.