参考文献排序问题

来源：百度知道 编辑：UC知道 时间：2024/05/21 00:13:59
处理论文中发现的问题，求教：
插入参考文献的时候用的是尾注的方法。然后在文中也会出现连续的编号超过3个，如：[2，3，4]，按规定，当超过三个的时候需要改写成[2-4],想提问的问题是：在不删除尾注的情况下（如上例中的3），如何变成要改写成的[2-4]形式？在线等，谢谢。
谢谢
回答者： 碗里熊猫

感觉好麻烦呀。有简单的方法么？

引用文献的话加尾注的问题，我只记得当初有人找过方法但最后发觉word的尾注功能好像是没有办法自动加中括号的（假设你想用这种形式的尾注），加上中括号里面的数值就不会自动更改了，换而言之就是说如果一定得加上中括号的话可能只有自己在自定义标记里手工操作了！
如果一定要试试看的话，你试试看用宏来操作吧，我也是看来的没有试过：
Sub RefineEndNote()
Dim n As Integer
n = 1
For Each Endnote In ActiveDocument.Endnotes
ActiveDocument.Endnotes(n).Reference.InsertBefore (" [")
ActiveDocument.Endnotes(n).Reference.InsertAfter ("]")
ActiveDocument.Endnotes(n).Range.Select
Selection.MoveLeft Unit:=wdCharacter, Count:=3, Extend:=wdMove
Selection.TypeText ("[")
Selection.MoveRight Unit:=wdCharacter, Count:=1, Extend:=wdExtend
Selection.Font.Superscript = False
Selection.MoveRight Unit:=wdCharacter, Count:=1, Extend:=wdMove
Selection.TypeText ("]")
n = n + 1
Next
End Sub

补充：小姐，这个是宏啊！我问过许多同学了都没有办法，这个还是偶然在人家博客里看到的，要带中括号就只有这一条路了，而且一定要自己写进word滴，人家已经帮你录制好内容了你拷贝进去就行了还嫌麻烦？呵呵！