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

Kako pretvoriti komentarje v opombe ali končne opombe v programu Microsoft Word?

Če v vašem Wordovem dokumentu obstaja več komentarjev, kako lahko pretvorite vse te komentarje v sprotne ali končne opombe hkrati? Ta članek vsebuje metode VBA za njegovo doseganje.

Komentarje pretvorite v opombe ali končne opombe s kodo VBA


Komentarje pretvorite v opombe ali končne opombe s kodo VBA

Spodnje kode VBA vam pomagajo hitro pretvoriti vse komentarje v trenutnem dokumentu v opombe ali končne opombe. Naredite naslednje.

1. Odprite dokument, v katerem so komentarji, ki jih boste pretvorili v opombe ali končne opombe, in pritisnite druga + F11 tipke za odpiranje Microsoft Visual Basic za aplikacije okno.

2. V Ljubljani Microsoft Visual Basic za aplikacije okno, kliknite Vstavi > Modul. Nato kopirajte spodnjo kodo VBA v okno modula.

Koda VBA: Pretvori komentarje v opombe:

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

Koda VBA: Pretvori komentarje v končne opombe:

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. Pritisnite F5 tipko za zagon kode.

Nato se vsi komentarji v trenutnem dokumentu takoj pretvorijo v opombe ali končne opombe na podlagi uporabljene kode VBA.


Sorodni članki:


Priporočena orodja za produktivnost besed

 

Kutools za Word - Več kot 100 naprednih funkcij za Word, prihranite 50% časa

  • Zapletene in ponavljajoče se operacije je mogoče enkrat obdelati v nekaj sekundah.
  • V Wordov dokument hkrati vstavite več slik v mape.
  • Združite in združite več datotek Word v mapah v eno z želenim vrstnim redom.
  • Trenutni dokument razdelite na ločene dokumente glede na naslov, prelom odseka ali druga merila.
  • Pretvarjanje datotek med dokumenti Doc in Docx, Docx in PDF, zbirka orodij za pogoste pretvorbe in izbiro itd. ...
Komentarji (1)
Ocene še ni. Bodite prvi in ​​ocenite!
Ta komentar je moderator na spletnem mestu minimiziral
To je neverjetno. Najlepša hvala!!! res koristno.
Tu še ni objavljenih komentarjev
Pustite vaše komentarje
Objava kot gost
×
Ocenite to objavo:
0   Znaki
Predlagane lokacije

Sledi nam

Copyright © 2009 - www.extendoffice.com. | Vse pravice pridržane. Poganja ga ExtendOffice. | Kazalo
Microsoft in logotip Office sta blagovni znamki ali registrirani blagovni znamki družbe Microsoft Corporation v ZDA in / ali drugih državah.
Zaščiteno s Sectigo SSL