If i = Then GoTo Line1Ī.NextHeaderFooterĪ. 'REM: INSERT Code from RECORD MACRO recorded when editing one Footer correctly If you don’t want to memorize the shortcut, you can also access the strikethrough command through the Format Cells dialog box.
Hitting Ctrl + 5 a second time removes the text effect. Hitting the Ctrl + 5 shortcut once applies the text effect. So, thanks to Issun, here is my solution: `Ī.SeekView = wdSeekCurrentPageFooterįor i = 1 To Simply select your text (or the cell with your text in it) and hit Ctrl + 5. I have the main Macro functioning.ĭoes WORD 2010 Macro-VBA preclude simple Edit-Footer function? This subroutine is one that I would call from the Main Macro that is stepping through each file in a Folder (& subfolders). 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. 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).Ī research of various VBS options shows several ways to create Footers and to make global Footer setting changes within Macro. Figure B Generate the numbers after the fact. Recording Macros used to take GoToFooter (or Edit Footer) Menu Commands and allow subsequent editing. Select the list and click Numbering Word adds sequential numbers, beginning with 1, to the complete list all at once, as shown in Figure B. I have only basic VBA experince and my prior Macro experence was primarily with WORD 2003.
