View Single Post
  #2  
Old May 15th, 2017, 04:58 AM
Fanni Fanni is offline
Member
 
First recorded activity by OfficeFrustration: May 2017
Posts: 1
Default

hello,

It seems there is no such fuction which can do that directly in Word. As a workaround, try to use VBA code. See below.


Sub BatchConvertFootnotesToEndnotes()
Dim objWordApplication As New Word.Application
Dim strFile As String
Dim strFolder As String

strFolder = InputBox("Enter the folder address", "Folder Address", "For example:E:\test word\test\")
strFile = Dir(strFolder & "*.doc*", vbNormal)

While strFile ""
With objWordApplication
.Documents.Open (strFolder & strFile)
.ActiveDocument.Footnotes.Convert
.ActiveDocument.Close
End With
strFile = Dir()
Wend

Set objWordApplication = Nothing

End Sub

And I also attach the article which I find this macro, hope it helps.

https://www.datanumen.com/blogs/6-wa...word-document/

Last edited by Fanni : May 22nd, 2017 at 10:29 AM.