word批量添加书签

用宏吧。下面这个代码为选中表格的第一列的所有行都添上形如“Bookmark_1、Bookmark_2、Bookmark_3”的书签。试试看： word批量添加书签

1、选中那个表格；
2、键入Alt+F11打开VBA编辑器，选择菜单“插入-模块”；
3、在代码编辑区中粘贴如下内容：
SubBatchAddBookmarks()

DimoRowAsRow

ForEachoRowInSelection.Tables(1).Rows
oRow.Cells(1).Range.Bookmarks.Add("Bookmark_"&oRow.Index)
Next

MsgBox"Done!"

EndSub
4、键入F5运行，看到“完成！”结束；
5、Alt+Q切换回Word文档窗口，检查书签是否添加正确。