Note: The other languages of the website are Google-translated. Back to English

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 Worddobrý nápad3


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ž
100
 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:

doc kutools převádí vysvětlivky na text 1

2. Po kliknutí Convert Endnotes to Text, uvidíte výsledek, jak ukazují níže uvedené snímky obrazovky:




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.
Klikněte na bezplatnou zkušební verzi karty Office!

Procházejte více slovních dokumentů v jednom okně jako Firefox
Komentáře (1)
Zatím žádné hodnocení. Buďte první, kdo ohodnotí!
Tento komentář byl moderátorem webu minimalizován
Díky za makro! Super užitečné!

(Fyi - máte "v", kde by měl být řádek ".Forward", ale ušetřili jste mi pár hodin zjišťování, jak psát vlastní. Skvělé!
Zatím zde nejsou žádné komentáře
Zanechat své připomínky
Odesílání jako host
×
Ohodnoťte tento příspěvek:
0   Postavy
Doporučená umístění

Sociální sítě

Copyright © 2009 - www.extendoffice.com. | Všechna práva vyhrazena. Poháněno ExtendOffice. | |. | Sitemap
Microsoft a logo Office jsou ochranné známky nebo registrované ochranné známky společnosti Microsoft Corporation ve Spojených státech a / nebo jiných zemích.
Chráněno Sectigo SSL