Ugrás a tartalomra

Az összes végjegyzet konvertálása egyszerű szöveggé a Word-ben

A végjegyzetek szöveggé konvertálása kényelmes lesz azok szerkesztésére vagy törlésére. Például, ha egyszerre szeretné kiválasztani a végjegyzeteket a másik szokásos szöveggel, akkor a Word ezt nem teszi lehetővé. Hogyan érheti el könnyen? Ez az oktatóanyag számos módszert mutat be a végjegyzetek egyszerű szöveggé konvertálásához.

A végjegyzeteket kézzel konvertálja szöveggé

Konvertálja a végjegyzeteket szöveggé a VBA segítségével

Konvertálja a végjegyzeteket szöveggé a Kutools for Word segítségéveljó ötlet3


A végjegyzeteket kézzel konvertálja szöveggé

1. Helyezze a kurzort arra a helyre, ahol a végjegyzetek találhatók, majd nyomja meg a gombot Ctrl + A hogy kiválassza az összes végjegyzetet a dokumentumból. Lásd a képernyőképet:

2. nyomja meg Ctrl + C hogy másolja a végjegyzeteket.

3. nyomja meg Ctrl + Vége hogy a kurzort az egész dokumentum végére és a végjegyzetek elé vigye.

4. nyomja meg Ctrl + V a végjegyzet beillesztése a dokumentum végére. A végjegyzetek sorrendje sértetlen lesz, de a beillesztett végjegyzeteket megváltoztatták. Lásd a képernyőképet:

5. A szöveg előtti 1-es számot cserélje le kézzel az eredeti számlistára.


Konvertálja a végjegyzeteket szöveggé a VBA segítségével

Egyszóval a végjegyzeteket egyszerű szöveggé is konvertálhatja VBA kóddal.

1: Nyomja meg a gombot Alt + F11 megnyitni a Microsoft Visual Basic for Applications ablak;

2: Kattintson Modulok ból ből betétlap fülre másolja és illessze be a következő VBA kódot a Modulok ablak;

3: Kattintson futás vagy nyomja meg a gombot F5 hogy alkalmazzák a VBA-t.

A végjegyzeteket szöveggé alakító VBA:

Alkonvertálójegyzet ()
Dim aendnote Végjegyzetként
Az ActiveDocument minden egyes jegyzetéhez. Végezetek
ActiveDocument.Range.InsertAfter vbCr & aendnote.Index _
& vbTab & aendnote.Range
aendnote.Reference.InsertBeford "a" & aendnote.Index & "a" előtt
Következő aendnote
Az ActiveDocument minden egyes jegyzetéhez. Végezetek
aendnote.Reference.Delete
Következő aendnote
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
A Selection.Find.Replacement.Font
.Superscript = Igaz
Vége
Selection.Find
.Text = "(a) ([0-9] {1,}) (a)"
.Replacement.Text = "\ 2" v .Előre = Igaz
.Wrap = wdFindContinue
.Formátum = Igaz
.MatchWildcards = Igaz
Vége
Selection.Find.Execute Csere: = wdReplaceAll
End Sub

Jegyzet: Megváltoztathatja a makró elejét és végét, hogy megfeleljen a tetszésének.


Konvertálja a végjegyzeteket szöveggé a Kutools for Word segítségével

A számítógép új kezei számára a VBA túl bonyolult ahhoz, hogy kezelni tudja. De azzal Kutools for Word telepítve, gyorsan konvertálhatja az összes végjegyzetet szöveggé Convert Endnotes to Text segédprogram egyetlen kattintással.

Kutools for Word, Több mint  praktikus funkciókkal megkönnyíti a munkáját. 

Telepítése után Kutools for Word, kérjük, tegye a következőket:(A Kutools for Word ingyenes letöltése most!)

1. Kattintson a gombra kattintva Kutools > Megtérít > Convert Endnotes to Text. Lásd a képernyőképet:

doc kutools konvertálja a végjegyzeteket 1. szöveggé

2. Kattintás után Convert Endnotes to Text, az eredményt az alábbi képernyőképek mutatják:




Relatív cikk:


Füles böngészés és több Word-dokumentum / Excel-munkafüzet szerkesztése Firefox, Chrome, Internet Explore 10 néven!

Ismerős lehet, hogy Firefox/Chrome/IE böngészőben több weboldalt is megtekinthet, és a megfelelő lapokra kattintva egyszerűen válthat közöttük. Itt az Office Tab támogatja a hasonló feldolgozást, amely lehetővé teszi több Word-dokumentum vagy Excel-munkafüzet böngészését egy Word- vagy Excel-ablakban, és a fülükre kattintva könnyedén válthat közöttük.
Kattintson az Office Tab ingyenes próbaverziójához!

Böngésszen több szavas dokumentumot egy ablakban Firefox néven
Comments (1)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Thank for the macro! Super helpful!

(Fyi - you have a "v" where there should be a linefeed by ".Forward", but you saved me a couple of hours of figuring out writing my own. Awesome!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations