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ével
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:
2. Kattintás után Convert Endnotes to Text, az eredményt az alábbi képernyőképek mutatják:
Bemutató: Konvertálja az összes végjegyzetet szöveggé szövegben
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. |