VBA（Word） - 页脚形状集合包含页脚和页眉形状

Question

我的文档只有一个页眉/页脚类型 - wdHeaderFooterPrimary，常数= 1.我尝试与页脚中的形状进行交互，但集合也包含标题中的形状。

我可以通过.top属性区分哪一个来自标题，哪一个来自页脚，但是对于这么多元素和数千个文件，它需要很长时间。

还有其他方法我只能提到页脚形状吗？

Dim shp as Object

For Each shp in ActiveDocument.Sections(1).Footers(1).Shapes
    debug.print shp.name
Next shp

Answer 1

请改为尝试：

For Each shp In ActiveDocument.Sections(1).Footers(1).Range.ShapeRange