Word VBA 宏 Bookmarks 报错5828 错误的书签名称解决办法

Surrea1

已于 2023-05-23 15:31:30 修改

阅读量989

点赞数

分类专栏： Office 文章标签： microsoft

于 2022-08-19 21:24:26 首次发布

本文链接：https://blog.csdn.net/Surrea1/article/details/126431997

版权

Office 专栏收录该内容

2 篇文章

订阅专栏

在使用Word VBA编写宏添加书签时，遇到因选中行末换行符导致的错误。通过调试发现，选中的整行文本包含了换行符。为解决此问题，博主在添加书签前移除了选区末尾的换行符，成功避免了错误。这一解决方案对于处理类似问题具有参考价值。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

问题描述：

在用 Word VBA 编写自动添加书签的宏时，出现以下错误：

代码：

Sub AddBookmark(prefix As String)
    Selection.HomeKey Unit:=wdLine, Extend:=wdExtend '这两行代码选中整一行
    Selection.MoveEnd Unit:=wdLine, Count:=1
    Set bookmarkName = Selection.Range
    With ActiveDocument.Bookmarks
        .Add Range:=Selection.Range, Name:=prefix & "_" & bookmarkName
        .DefaultSorting = wdSortByName
        .ShowHidden = False
    End With
End Sub

查阅国内外的相关资料无果，只能自己 debug

由于前面使用 Selection 选中了整一行文本，而通过观察发现选中的整行文本实际上是包含换行符的，如下图：