Jak převést všechny vysvětlivky na prostý text v aplikaci Word
Převedení vysvětlivek na text vám usnadní úpravy nebo odstranění. Například pokud chcete vybrat vysvětlivky s jiným běžným textem najednou, Word vám to nedovolí. Jak to můžete snadno udělat? Tento výukový program vám ukáže několik metod převodu vysvětlivek na prostý text.
Převádějte vysvětlivky na text ručně
Převádějte vysvětlivky na text pomocí VBA
Převeďte vysvětlivky na text pomocí Kutools pro Word
Převádějte vysvětlivky na text ručně
1. Umístěte kurzor na místo, kde se nacházejí vysvětlivky, a stiskněte Ctrl + vyberte všechny vysvětlivky z dokumentu. Viz snímek obrazovky:
2. lis Ctrl + C kopírovat vysvětlivky.
3. lis Ctrl + End přesunout kurzor na konec celého dokumentu a před vysvětlivky.
4. lis Ctrl + V vložit vysvětlivku na konec dokumentu. Pořadí vysvětlivek bude neporušené, ale vložené vysvětlivky byly změněny. Viz snímek obrazovky:
5. Ručně nahraďte celé číslo 1 před textem původním seznamem čísel.
Převádějte vysvětlivky na text pomocí VBA
V aplikaci Word můžete také převést vysvětlivky na prostý text pomocí kódu VBA.
1: Stiskněte Alt + F11 otevřít a Okno Microsoft Visual Basic pro aplikace;
2: Klepněte na tlačítko Modul od Vložit kartu, zkopírujte a vložte následující kód VBA do souboru Modul okno;
3: Klepněte na tlačítko Běh nebo stiskněte tlačítko F5 použít VBA.
VBA, které převádějí vysvětlivky na text:
Subvertendnote ()
Dim aendnote jako Endnote
Pro každou poznámku v ActiveDocument.Endnotes
ActiveDocument.Range.InsertAfter vbCr & aendnote.Index _
& vbTab & aendnote. Rozsah
aendnote.Reference.InsertBefore „a“ & aendnote.Index & „a“
Další poznámka
Pro každou poznámku v ActiveDocument.Endnotes
aendnote.Reference.Delete
Další poznámka
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
Se Selection.Find.Replacement.Font
.Horní index = Pravda
Konec s
S výběrem
.Text = "(a) ([0-9] {1,}) (a)"
.Replacement.Text = "\ 2" v Předmět = Pravda
.Wrap = wdFindContinue
.Format = Pravda
.MatchWildcards = Pravda
Konec s
Selection.Find.Execute Nahradit: = wdReplaceAll
End Sub
Poznámka: Začátek a konec makra můžete změnit podle svých představ.
Převeďte vysvětlivky na text pomocí Kutools pro Word
Pro ty nové počítačové handy je VBA příliš složitý na to, aby se s nimi dalo zacházet. Ale s Kutools pro Word nainstalován, můžete rychle převést všechny vysvětlivky na text pomocí Convert Endnotes to Text nástroj jedním kliknutím.
Kutools pro Word, s více než užitečné funkce, které vám usnadní práci. | ||
Po instalaci Kutools pro Word, prosím, postupujte takto:(Stažení zdarma Kutools pro Word hned!)
1. Použijte tento nástroj kliknutím Kutools > Konvertovat > Convert Endnotes to Text. Viz snímek obrazovky:
2. Po kliknutí Convert Endnotes to Text, uvidíte výsledek, jak ukazují níže uvedené snímky obrazovky:
Ukázka: Převede všechny vysvětlivky na texty ve Wordu
Relativní článek:
Procházení a úpravy více dokumentů Word / sešitů aplikace Excel jako Firefox, Chrome, Internet Prozkoumejte na kartách 10! |
Možná znáte prohlížení více webových stránek ve Firefoxu / Chrome / IE a přepínáte mezi nimi snadným kliknutím na příslušné karty. Zde karta Office podporuje podobné zpracování, které vám umožní procházet více dokumentů aplikace Word nebo sešitů aplikace Excel v jednom okně aplikace Word nebo v okně aplikace Excel a snadno mezi nimi přepínat kliknutím na jejich karty. |