Word VBA 常用却很少人提及的命令(跳页,计算图片数)
'获得指定表格的某个单元格内容
Application.ActiveDocument.Tables(1).Cell(1, 1).Range.Text
'获取指定表格所在页
Application.ActiveDocument.Tables(2).Select
https://www.wendangku.net/doc/df9351761.html,rmation(wdActiveEndPageNumber)
'获取当前页面的开始字符数
Application.ActiveDocument.Bookmarks("\page").Start
'获取当前页面的结束字符数
Application.ActiveDocument.Bookmarks("\page").End
'获取当前页面中的图片数
Application.ActiveDocument.Bookmarks("\page").Range.InlineShapes.Count
'跳到第6页
Application.ActiveWindow.Selection.GoTo wdGoToPage, wdGoToNext, , 6
'获得当前word窗口索引
Application.ActiveWindow.Index
'选中当前页所有内容
Application.ActiveDocument.Bookmarks("\page").Range.Select