Hur man konverterar alla slutnoter till vanlig text i Word
Konvertera slutnoter till text är bekvämt för dig att redigera eller ta bort dem. Om du till exempel vill välja slutnoterna med den andra vanliga texten på en gång tillåter inte Word det. Hur kan du få det gjort enkelt? Denna handledning visar dig flera metoder för att konvertera slutnoter till vanlig text.
Konvertera slutnoter till text manuellt
Konvertera slutnoter till text med VBA
Konvertera slutnoter till text med Kutools for Word
Konvertera slutnoter till text manuellt
1. Placera markören där slutnoterna finns och tryck sedan på Ctrl + A för att välja alla slutnoter från dokumentet. Se skärmdump:
2. Tryck Ctrl + C för att kopiera slutnoterna.
3. Tryck Ctrl + End för att flytta markören till slutet av hela dokumentet och före slutnoterna.
4. Tryck Ctrl + V för att klistra in slutnoten till slutet av dokumentet. Ordningen på slutnoterna kommer att vara intakt, men de klistrade slutnoterna ändrades. Se skärmdump:
5. Byt ut hela siffran 1 före texten med originalnummerslistan manuellt.
Konvertera slutnoter till text med VBA
I ord kan du också konvertera slutnoter till vanlig text med VBA-kod.
1: Tryck Alt + F11 att öppna en Microsoft Visual Basic for Applications-fönstret;
2: Klicka Modulerna från Insert fliken, kopiera och klistra in följande VBA-kod i Modulerna fönster;
3: Klicka Körning knappen eller tryck på F5 att tillämpa VBA.
VBA som konverterar slutnoter till text:
Underkonverteringsnot ()
Dim aendnote Som Endnote
För varje aendnote i ActiveDocument.Endnotes
ActiveDocument.Range.InsertAfter vbCr & aendnote.Index _
& vbTab & aendnote.Range
aendnote.Reference.InsertBefore "a" & aendnote.Index & "a"
Nästa kommentar
För varje aendnote i ActiveDocument.Endnotes
aendnote.Reference.Delete
Nästa kommentar
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
Med Selection.Find.Replacement.Font
.Superscript = Sant
Sluta med
Med Selection.Find
.Text = "(a) ([0-9] {1,}) (a)"
.Replacement.Text = "\ 2" v Framåt = Sant
.Wrap = wdFindContinue
.Format = sant
.MatchWildcards = Sant
Sluta med
Selection.Find.Execute Replace: = wdReplaceAll
End Sub
Notera: Du kan ändra början och slutet av makrot för att möta dina gillar.
Konvertera slutnoter till text med Kutools for Word
För de nya datorhänderna är VBA för komplicerat att hantera. Men med Kutools för Word installerat kan du snabbt konvertera alla slutnoter till text med Convert Endnotes to Text med ett klick.
Kutools för Word, med mer än praktiska funktioner, underlättar dina jobb. | ||
När du har installerat Kutools för Word, gör så här:(Gratis nedladdning Kutools för Word nu!)
1. Använd detta verktyg genom att klicka på Kutools > Konvertera > Convert Endnotes to Text. Se skärmdump:
2. Efter att ha klickat Convert Endnotes to Text, kommer du att se resultatet som nedanstående skärmdumpar visar:
Demo: Konvertera alla slutnoter till texter i ord
Relativ artikel:
Tabbad surfning och redigering av flera Word-dokument / Excel-arbetsböcker som Firefox, Chrome, Internet Explore 10! |
Du kanske är bekant att visa flera webbsidor i Firefox / Chrome / IE och växla mellan dem genom att enkelt klicka på motsvarande flikar. Här stöder Office Tab liknande bearbetning, som låter dig bläddra i flera Word-dokument eller Excel-arbetsböcker i ett Word-fönster eller Excel-fönster och enkelt växla mellan dem genom att klicka på deras flikar. |