title: WORD 2010 Macro for Editing Headers & Footers
body: <p>I have only basic VBA experince and my prior Macro experence was primarily with WORD 2003.  Recording Macros used to take GoToFooter (or Edit Footer) Menu Commands and allow subsequent editing.  In WORD 2010, this (and many other) commands do not "record" to the Macro (yet when in Record mode, I do get into Edit Footer function).</p>
  
  <p>A research of various VBS options shows several ways to create Footers and to make global Footer setting changes within Macro.  However If I simply want to Revise the Company name within the Footer (for example), I can find no way to do this within a Macro subroutine.</p>
  
  <p>This subroutine is one that I would call from the Main Macro that is stepping through each file in a Folder (&amp; subfolders).  I have the main Macro functioning.</p>
  
  <p>Does WORD 2010 Macro-VBA preclude simple Edit-Footer function?</p>
  
  <p>Thanks in advance</p>
  
  <p>So, thanks to Issun, here is my solution:</p>
  
  <pre><code>`
  Sub Sub_FTR_0()
  '
  ActiveDocument.ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageFooter
  
  For i = 1 To ActiveDocument.Sections.Count
   'REM: INSERT Code from RECORD MACRO recorded when editing one Footer correctly
      Selection. [[xxx]], etc.
  
  If i = ActiveDocument.Sections.Count Then GoTo Line1
  
      ActiveDocument.ActiveWindow.ActivePane.View.NextHeaderFooter
  
  Line1:
  Next
  
      ActiveWindow.ActivePane.View.SeekView = wdSeekMainDocument
  
  End Sub
  `
  </code></pre>