You need to enable JavaScript to run this app.
优惠活动
大模型
产品
解决方案
定价
更多

MS Word设置尾注显示在特定章节后,修改标题样式不新建章节

在Word中将尾注固定显示在「参考文献」章节之后的解决方案

针对你遇到的尾注位置问题,有两种可行的解决方法,其中宏方法适合大量尾注的场景,手动方法适合小体量文档:

方法一:VBA宏自动迁移尾注(推荐)

宏创建与使用步骤

  1. 打开VBA编辑器:按下Alt + F11组合键。
  2. 插入模块:在左侧「工程」面板右键点击当前文档名称,选择「插入」→「模块」。
  3. 粘贴以下代码:
Sub MoveEndnotesToReferences()
    Dim refRange As Range
    Dim endnoteRange As Range
    Dim doc As Document
    
    Set doc = ActiveDocument
    
    ' 定位参考文献标题(按需修改文本和样式)
    Set refRange = doc.Content
    With refRange.Find
        .Text = "参考文献" ' 替换为你的参考文献标题文本
        .Style = doc.Styles("标题1") ' 替换为你实际使用的标题样式,比如「标题2」
        .Execute
    End With
    
    If refRange.Find.Found Then
        ' 跳转到参考文献章节末尾
        refRange.MoveEnd wdStory, 1
        refRange.Collapse wdCollapseEnd
        
        ' 剪切所有尾注
        Set endnoteRange = doc.Endnotes.Range
        endnoteRange.Cut
        
        ' 粘贴到参考文献末尾
        refRange.Paste
        
        ' 重置尾注分隔线(可选)
        doc.Endnotes.Separator.Delete
        doc.Endnotes.Separator.Range.Text = "---" ' 可自定义分隔线样式
    Else
        MsgBox "未找到「参考文献」章节,请检查标题文本或样式设置!"
    End If
End Sub
  1. 适配你的文档:
    • 若参考文献标题不是「参考文献」,修改代码中.Text = "参考文献"的文本内容。
    • 若参考文献用的不是「标题1」样式,替换.Style = doc.Styles("标题1")里的样式名称。
  2. 运行宏:返回Word界面,按下Alt + F8,选择MoveEndnotesToReferences,点击「运行」即可。

注意事项

  • 宏运行后,所有尾注会被迁移到参考文献章节之后,你可以在尾注后正常添加附录等内容。
  • 后续新增尾注时,需重新运行宏,或手动剪切粘贴到目标位置。

方法二:手动调整分节符(适合少量尾注)

  1. 先将尾注设置为「文档末尾」:点击「引用」→「尾注」右下角的小箭头,在弹出的对话框中选择「尾注」→「文档末尾」,点击「应用」。
  2. 定位到参考文献章节的最后一个字符后,插入连续分节符:点击「布局」→「分隔符」→「连续」。
  3. 选中所有尾注(从尾注分隔线到最后一条尾注),按下Ctrl + X剪切。
  4. 将光标移到连续分节符之后,按下Ctrl + V粘贴尾注。
  5. 此时尾注固定在参考文献之后,可在尾注后继续添加其他内容。

内容的提问来源于stack exchange,提问作者WnGatRC456

相关产品推荐
方舟 Agent Plan

超全模态模型 × Harness 升级,最新支持 Deepseek-V4.1-Flash、GLM-5.3 系列、Doubao-Seedream-5.0-pro、Kimi-K3 (部分), 限时 9.9 元起

最近更新时间:2026.08.24 07:15:38