如何在VBA中获取页眉而不是章节标题

Question

我很难从包含数百页的word文档中获取页眉，它有不同的标题

我的代码：

pageHeader = wdDoc.Sections(pageNumber).Headers(1).Range.Text

此代码获取Section的标题，但不是页面的特定标题。因此，标题有可能不正确。

我唯一的输入是pageNumber

上下文：我将word文档导入excel，每个单词页面都有表格，这些表格与它们唯一的编号相关联，显然位于每个页面的标题中，因此不同的页面可以有不同的标题

Answer 1

尝试以下方面的事情：

wdDoc.Range.GoTo(What:=wdGoToPage, Name:=i).Sections.First.Headers(wdHeaderFooterPrimary).Range.Text

其中我是页码。

注意：上面的代码假设您正在使用早期绑定。对于后期绑定，请使用以下内容：

wdDoc.Range.GoTo(1, i).Sections.First.Headers(1).Range.Text