Sut i drosi sylwadau i droednodiadau neu ôl-nodiadau yn Microsoft Word?
Awdur: Siluvia Wedi'i Addasu Diwethaf: 2024-08-29
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:
Gwnewch Mwy mewn Llai o Amser gyda Kutools wedi'i Wella gan AI ar gyfer Word
Nid set o offer yn unig yw Kutools ar gyfer Word - mae'n ddatrysiad smart sydd wedi'i gynllunio i roi hwb i'ch cynhyrchiant. Gyda galluoedd a yrrir gan AI a'r nodweddion mwyaf hanfodol, mae Kutools yn eich helpu i gyflawni mwy mewn llai o amser:
- Cynhyrchu cynnwys sy'n cyfateb yn berffaith i'ch anghenion.
- Trawsnewidiwch eich ysgrifennu gyda dros 20 o arddulliau ysgrifennu, gan sicrhau ei fod yn ddi-fai.
- Crynhowch eich dogfen mewn un clic.
- Cyfieithwch eich cynnwys i dros 40 o ieithoedd yn rhwydd, gan ehangu eich cyrhaeddiad yn fyd-eang.
- Derbyn cymorth a gwybodaeth ar unwaith am eich dogfen.
- Gofynnwch am brosesu dogfennau, ac os oes gan Kutools yr offeryn, bydd y Cynorthwy-ydd AI yn cyflawni'ch tasg ar unwaith ar eich gorchymyn, gan roi pŵer llawn Word ar flaenau eich bysedd.
- Gofynnwch unrhyw gwestiwn heb adael Word - wedi'i integreiddio'n ddi-dor, mae'r Cynorthwy-ydd AI bob amser o fewn cyrraedd.
- Cynhyrchu, ailysgrifennu, crynhoi, a chyfieithu cynnwys gyda chliciau.
- Derbyn cymorth a gwybodaeth ar unwaith am eich dogfen.
- Gofynnwch am brosesu dogfennau, a bydd y Cynorthwy-ydd AI yn cyflwyno'r offeryn cywir ac yn cyflawni'r dasg, neu'n eich tywys trwy'r camau.
- Gofynnwch unrhyw gwestiwn heb adael Word - wedi'i integreiddio'n ddi-dor, mae'r Cynorthwy-ydd AI bob amser o fewn cyrraedd.
Dysgwch fwy am Kutools ar gyfer Word Lawrlwytho Nawr
Offer Cynhyrchiant Swyddfa Gorau
Kutools am Word - 100+ Offer ar gyfer Word
