Question

word中如何给编号项批量书签

word表格中有N个表格，均已编号为表 X的形式，有N个图片，均已编号为图 X的形式，如何给表和图的编号批量添加书签，在文档中有很多地方需要交叉引用这些表格和图片。

Answer 1

用一个宏可以大大减轻工作量。

功能是这样的：选中需要插入标签的表或图的编号，如“表1”，按下宏快捷键，则“表1”被自动创建到书签中，且书签名称也为“表1”，然后继续找下一个按照同样方法指导所有图表全部添加完成。

需要注意的问题：选择的内容不能包含空格、特殊字符、回车等段落符号，否则会报错。

宏代码如下：

Sub 宏1()

'

' 宏1 宏

'

'

     With ActiveDocument.Bookmarks

        .Add Range:=Selection.Range, Name:=Selection.Text

        .DefaultSorting = wdSortByName

        .ShowHidden = False

    End With

End Sub