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

Sut i drosi sylwadau i droednodiadau neu ôl-nodiadau yn Microsoft Word?

Gan dybio bod sawl sylw yn eich dogfen Word, sut allwch chi drosi'r holl sylwadau hyn yn droednodiadau neu ôl-nodiadau ar yr un pryd? Mae'r erthygl hon yn darparu dulliau VBA i'w gyflawni.

Trosi sylwadau i droednodiadau neu ôl-nodiadau gyda chod VBA


Trosi sylwadau i droednodiadau neu ôl-nodiadau gyda chod VBA

Gall y codau VBA isod eich helpu i drosi'r holl sylwadau yn y ddogfen gyfredol yn gyflym i droednodiadau neu ôl-nodiadau. Gwnewch fel a ganlyn.

1. Agorwch y ddogfen yn cynnwys sylwadau y byddwch yn eu trosi i droednodiadau neu ôl-nodiadau, pwyswch y Alt + F11 allweddi i agor y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.

2. Yn y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr, cliciwch Mewnosod > Modiwl. Yna copïwch isod god VBA i mewn i ffenestr y Modiwl.

Cod VBA: Trosi sylwadau yn droednodiadau:

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

Cod VBA: Trosi sylwadau i ôl-nodiadau:

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. Gwasgwch y F5 allwedd i redeg y cod.

Yna mae'r holl sylwadau yn y ddogfen gyfredol yn cael eu trosi'n droednodiadau neu ôl-nodiadau ar unwaith yn seiliedig ar y cod VBA y gwnaethoch chi ei gymhwyso.


Erthyglau cysylltiedig:


Offer Cynhyrchedd Geiriau a Argymhellir

 

Kutools Ar gyfer Word - Mwy Na 100 Nodweddion Uwch Ar gyfer Word, Arbedwch Eich 50% Amser

  • Gellir gwneud gweithrediadau cymhleth ac ailadroddus brosesu un-amser mewn eiliadau.
  • Mewnosodwch ddelweddau lluosog ar draws ffolderau yn nogfen Word ar unwaith.
  • Uno a chyfuno ffeiliau Word lluosog ar draws ffolderau yn un gyda'r drefn a ddymunir gennych.
  • Rhannwch y ddogfen gyfredol yn ddogfennau ar wahân yn ôl pennawd, toriad adran neu feini prawf eraill.
  • Trosi ffeiliau rhwng Doc a Docx, Docx a PDF, casglu offer ar gyfer trawsnewid a dewis cyffredin, ac ati ...
sylwadau (1)
Dim sgôr eto. Byddwch y cyntaf i sgorio!
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Mae hyn yn anhygoel. Diolch yn fawr iawn!!! defnyddiol iawn.
Nid oes unrhyw sylwadau wedi'u postio yma eto
Gadewch eich sylwadau
Postio fel Gwestai
×
Graddiwch y swydd hon:
0   Cymeriadau
Lleoliadau a Awgrymir