Note: The other languages of the website are Google-translated. Back to English

Hoe converteer ik opmerkingen naar voetnoten of eindnoten in Microsoft Word?

Stel dat er meerdere opmerkingen in uw Word-document staan, hoe kunt u al deze opmerkingen dan tegelijkertijd naar voetnoten of eindnoten converteren? Dit artikel biedt VBA-methoden om dit te bereiken.

Converteer opmerkingen naar voetnoten of eindnoten met VBA-code


Converteer opmerkingen naar voetnoten of eindnoten met VBA-code

Met de onderstaande VBA-codes kunt u snel alle opmerkingen in het huidige document converteren naar voetnoten of eindnoten. Ga als volgt te werk.

1. Open het document dat opmerkingen bevat die u naar voetnoten of eindnoten wilt converteren, druk op anders + F11 toetsen om de te openen Microsoft Visual Basic voor toepassingen venster.

2. In de Microsoft Visual Basic voor toepassingen venster klikt Invoegen > Module. Kopieer vervolgens onderstaande VBA-code naar het modulevenster.

VBA-code: converteer opmerkingen naar voetnoten:

Sub ConvertCommentsToFootnotes()
    Dim xComm As Comment
    Dim xCommRange As Range
    Dim xDoc As Document
    Application.ScreenUpdating = False
    Set xDoc = ActiveDocument
    For Each xComm In xDoc.Comments
        Set xCommRange = xComm.Range
        xDoc.Footnotes.Add xComm.Scope, , xCommRange.Text
        xComm.Delete
    Next
    Application.ScreenUpdating = True
End Sub

VBA-code: converteer opmerkingen naar eindnoten:

Sub ConvertCommentsToEndnotes()
    Dim xComm As Comment
    Dim xCommRange As Range
    Dim xDoc As Document
    Application.ScreenUpdating = False
    Set xDoc = ActiveDocument
    For Each xComm In xDoc.Comments
        Set xCommRange = xComm.Range
        xDoc.Endnotes.Add xComm.Scope, , xCommRange.Text
        xComm.Delete
    Next
    Application.ScreenUpdating = True
End Sub

3. druk de F5 sleutel om de code uit te voeren.

Vervolgens worden alle opmerkingen in het huidige document onmiddellijk geconverteerd naar voetnoten of eindnoten op basis van de VBA-code die u hebt toegepast.


Gerelateerde artikelen:


Aanbevolen Word-productiviteitstools

 

Kutools voor Word - meer dan 100 geavanceerde functies voor Word, bespaar 50% tijd

  • Ingewikkelde en herhaalde bewerkingen kunnen een eenmalige verwerking in seconden worden uitgevoerd.
  • Voeg meerdere afbeeldingen in verschillende mappen tegelijk in een Word-document in.
  • Voeg meerdere Word-bestanden in mappen samen en combineer ze tot één met de door u gewenste volgorde.
  • Splits het huidige document in afzonderlijke documenten op basis van koptekst, sectie-einde of andere criteria.
  • Converteer bestanden tussen Doc en Docx, Docx en PDF, verzameling tools voor algemene conversies en selectie, enzovoort ...
Comments (1)
Nog geen beoordelingen. Beoordeel als eerste!
Deze opmerking is gemaakt door de moderator op de site
Dit is geweldig. Hartelijk bedankt!!! echt nuttig.
Er zijn nog geen reacties geplaatst
Laat uw commentaar
Posten als gast
×
Beoordeel dit bericht:
0   Personages
Voorgestelde locaties