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

Kako pretvoriti vse končne opombe v navadno besedilo v Wordu

Pretvorite končne opombe v besedilo, zato jih boste lahko uredili ali izbrisali. Če na primer želite hkrati izbrati končne opombe z drugim običajnim besedilom, vam Word tega ne bo dovolil. Kako lahko to enostavno storite? Ta vadnica vam bo pokazala več načinov pretvorbe opomb v navadno besedilo.

Končne opombe ročno pretvorite v besedilo

Končne opombe pretvorite v besedilo z VBA

Pretvorite končne opombe v besedilo s programom Kutools for Worddobra ideja3


Končne opombe ročno pretvorite v besedilo

1. Kazalec postavite na mesto, kjer se nahajajo končne opombe, nato pritisnite Ctrl + , da iz dokumenta izberete vse končne opombe. Oglejte si posnetek zaslona:

2. Pritisnite Ctrl + C kopirajte končne opombe.

3. Pritisnite Ctrl + Konec da premaknete kurzor na konec celotnega dokumenta in pred končnimi opombami.

4. Pritisnite Ctrl + V da končno opombo prilepite na konec dokumenta. Vrstni red končnih opomb bo nedotaknjen, vendar so bili prilepljeni končni opombi spremenjeni. Oglejte si posnetek zaslona:

5. Vso številko 1 pred besedilom ročno zamenjajte s prvotnim seznamom številk.


Končne opombe pretvorite v besedilo z VBA

Z besedo lahko tudi končne opombe pretvorite v navadno besedilo s kodo VBA.

1: Pritisnite Alt + F11 da odprete Okno Microsoft Visual Basic for Applications;

2: kliknite Moduli iz Vstavi , kopirajte in prilepite naslednjo kodo VBA v Moduli okno;

3: kliknite Run ali pritisnite F5 za uporabo VBA.

VBA, ki pretvori končne opombe v besedilo:

Sub Convertendnote ()
Dim aendnote Kot Endnote
Za vsako opombo v ActiveDocument.Endnotes
ActiveDocument.Range.InsertAfter vbCr & aendnote.Index _
& vbTab & aendnote.Range
aendnote.Reference.InsertBefore "a" & aendnote.Index & "a"
Naslednja aendnota
Za vsako opombo v ActiveDocument.Endnotes
aendnote.Referenca.Izbriši
Naslednja aendnota
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
Z Selection.Find.Replacement.Font
.Supercript = True
Končaj s
Z izbiro Najdi
.Text = "(a) ([0-9] {1,}) (a)"
.Replacement.Text = "\ 2" v .Naprej = True
.Wrap = wdFindNastavi
.Format = Res
.MatchWildcards = Res
Končaj s
Selection.Find.Execute Replace: = wdReplaceAll
End Sub

Opomba: Začetek in konec makra lahko spremenite tako, da ustreza vašim željam.


Pretvorite končne opombe v besedilo s programom Kutools for Word

Za tiste računalniške nove roke je VBA preveč zapleten. Ampak s Kutools za Word nameščen, lahko vse končne opombe hitro pretvorite v besedilo z Convert Endnotes to Text z enim klikom.

Kutools za Word, z več kot
100
 priročne funkcije, vam olajša delo. 

Po namestitvi Kutools za Word, naredite spodaj:(Brezplačno prenesite Kutools za Word zdaj!)

1. Uporabite to orodje s klikom Kutools > Pretvarjanje > Convert Endnotes to Text. Oglejte si posnetek zaslona:

doc kutools pretvori končne opombe v besedilo 1

2. Po kliku Convert Endnotes to Text, rezultat boste videli, kot kažejo spodnji posnetki zaslona:




Sorodni članek:


Brskanje in urejanje več Wordovih dokumentov / delovnih zvezkov Excel kot Firefox, Chrome, Internet Explore 10!

V Firefoxu / Chromeu / IE si morda že želite ogledati več spletnih strani in med njimi preklapljati tako, da enostavno kliknete ustrezne zavihke. Tu Office Tab podpira podobno obdelavo, ki omogoča brskanje po več Wordovih dokumentih ali Excelovih delovnih zvezkih v enem Wordovem oknu ali Excelovem oknu in enostavno preklapljanje med njimi s klikom na njihove zavihke.
Kliknite brezplačno preskusno različico zavihka Office!

Brskajte po več besednih dokumentih v enem oknu kot Firefox
Komentarji (1)
Ocene še ni. Bodite prvi in ​​ocenite!
Ta komentar je moderator na spletnem mestu minimiziral
Hvala za makro! Super koristno!

(Fyi - imate "v", kjer bi moral biti pomik vrstice z ".Forward", vendar ste mi prihranili nekaj ur, ko sem ugotovil, da sem napisal svoje. Super!
Tu še ni objavljenih komentarjev
Pustite vaše komentarje
Objava kot gost
×
Ocenite to objavo:
0   Znaki
Predlagane lokacije

Sledi nam

Copyright © 2009 - www.extendoffice.com. | Vse pravice pridržane. Poganja ga ExtendOffice. | Kazalo
Microsoft in logotip Office sta blagovni znamki ali registrirani blagovni znamki družbe Microsoft Corporation v ZDA in / ali drugih državah.
Zaščiteno s Sectigo SSL