#16
|
|||
|
|||
Here is how sample p1.docx displays in Word 2007 on my system. Note that pagination might be different depending on which printer is default. |
#17
|
|||
|
|||
I now think my issue was a glitch peculiar to that particular doc and no other.
|
#18
|
||||
|
||||
Your note that it appears to be version specific made me go back to your original file to do some testing. If I convert your document to a specific version I can see that your preferred behaviour occurs shows up in file formats Word 2007 and 2010 but not in later versions.
Open your vba editor's Immediate window and type the following line and then press Enter ActiveDocument.SetCompatibilityMode wdWord2010 You should see that the footnotes now line up with their respective columns. The same thing happens if you try ActiveDocument.SetCompatibilityMode wdWord2007 However this one goes to the 'load balancing' version that you don't like ActiveDocument.SetCompatibilityMode wdWord2013
__________________
Andrew Lockton Chrysalis Design, Melbourne Australia |
#19
|
|||
|
|||
I just checked in Word 2010 and it is as you say.
A footnote will be kept in the column in which it is typed. |
#20
|
||||
|
||||
The behavior of multi-column footnotes will depend on how the document was created. For example, a brand new document in Word 2019 will always starts the footnotes in the left-most column. Documents in compatibility mode will behave differently. I'm not sure when this started, but multi-column footnotes in a document saved to the *.doc format will definitely start the footnotes in the second column (for example), if that is where the corresponding note in the body of document is located.
__________________
Stefan Blom Microsoft Word MVP Microsoft 365 apps for business Windows 11 Professional |
#21
|
|||
|
|||
Changing the compatibility mode in a new document will do this.
Here is a macro that will do this. Code:
Sub Word2010CompatibilityOn() ' ' Word2010CompatibilityOn Macro ' ' Charles Kenyon ' Written for WordArt Add-In ' Converts Active Document to Word 2010 format Dim Result As Long Result = MsgBox(prompt:="This will convert this document to Word 2010 format. You will lose any features added in later versions." & _ vbCr & "Are you sure?", Title:="Word 2010 Conversion Warning", buttons:=vbInformation + vbYesNo) On Error GoTo SkipConversion ' in case this is run in an earlier version of Word If Result = vbNo Then GoTo SkipConversion ActiveDocument.SetCompatibilityMode (wdWord2010) MsgBox "Conversion completed. If you are using Word 2013 or later, you should see Compatibility Mode in the Title Bar.", vbInformation, "Done" On Error GoTo 0 Exit Sub SkipConversion: MsgBox "Conversion skipped", vbInformation, "OK" On Error GoTo 0 End Sub Install/Employ VBA Procedures (Macros) by Greg Maxey |
Thread Tools | |
Display Modes | |
|
Similar Threads | ||||
Thread | Thread Starter | Forum | Replies | Last Post |
Footnote numbering wrong after section break | peterbav | Word | 1 | 03-17-2020 11:18 PM |
Sum Appears in Wrong Column? | ChrisOK | Excel Programming | 1 | 02-20-2018 02:05 PM |
Sum is Appearing in Wrong Column | ChrisOK | Word VBA | 0 | 02-20-2018 10:11 AM |
Upgrading from Office 2003 Student & Teacher Version to Office 2010 Home & Business | Scoop | Office | 2 | 04-22-2014 03:20 PM |
column break what am I doing wrong? | oaty | Word | 0 | 08-12-2010 10:15 AM |