Finding Frames In The Footer

[George Lee]

I am trying to identify all items in a footer, especially objects like
frames. If the footer is selected, the frames are easily seen:

Selection.Frames.Count

Count may be greater than zero (if any are present). However, in trying to
find the items when they aren't selected, the count is always zero:


ActiveDocument.Sections(x).Footer(wdHeaderFooterEvenPages).Range.Frames.Count

How can these things be found?

 

[Helmut Weber]

Hi George,

I think, something else must be wrong.

ActiveDocument.Sections(x).Footer(wdHeaderFooterEvenPages).Range.Frames.Count

With ActiveDocument.Sections(1)
MsgBox .Headers(wdHeaderFooterPrimary).Range.Frames.Count
End With

.... is working well here and now.


Greetings from Bavaria, Germany

Helmut Weber, MVP, WordVBA

Win XP, Office 2003
"red.sys" & Chr$(64) & "t-online.de"