Jak przenieść przypisy MS Word do tekstu podstawowego


1

Mam dokument MS Word z ponad 100 przypisami. Chcę umieścić je w tekście (gdzie obecnie znajduje się numer indeksu górnego) za pomocą <ref></ref>znacznika, dzięki czemu mogę umieścić dokument na wiki. Jak mam to zrobic?

Odpowiedzi:


1

Skończyło się na makrze:

Sub AddFnTextInBodyOfDoc()
Dim f As Footnote
Dim r As Range

For Each f In ActiveDocument.Footnotes
Set r = f.Reference
r.Collapse wdCollapseEnd
r.InsertAfter "<ref>" & f.Range.Text & "</ref>"

Next f
End Sub
Korzystając z naszej strony potwierdzasz, że przeczytałeś(-aś) i rozumiesz nasze zasady używania plików cookie i zasady ochrony prywatności.
Licensed under cc by-sa 3.0 with attribution required.