主题：[求助]Word表格所在的页码

word文档中，在某一页开始全部都有表格，请问当系统在读取某一页表格的时候能自动获取当前表格所在的页数，请问应该如何表述，谢谢！

Dim app As New MSWord.Application
try
    Dim fileName = "D:\test.doc"
    Dim doc = app.Documents.Open(fileName)
    Dim t = Doc.Tables(1)
    t.Select
    Dim n = app.ActiveWindow.Selection.Information(msword.WdInformation.wdActiveEndPageNumber)
    msgbox(n)
catch ex As exception
    msgbox(ex.message)
finally
    app.Quit
End try