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

Kako iskati in zamenjati več besed hkrati v Wordovem dokumentu?

Word ponuja funkcijo Najdi in zamenjaj, da poišče vse primere besede ali besedne zveze in jih hkrati nadomesti z novo besedo. Če pa želite hkrati iskati in nadomeščati različne besede, vam ta vgrajena funkcija ne more pomagati. V tem članku govorimo o metodi VBA za iskanje in zamenjavo več različnih besed hkrati v Wordovem dokumentu.

Poiščite in zamenjajte več besed hkrati v Wordu s kodo VBA
Preprosto poiščite in zamenjajte več besed hkrati v Wordu z neverjetno funkcijo


Poiščite in zamenjajte več besed hkrati v Wordu s kodo VBA

Za iskanje in zamenjavo več besed hkrati v besedilu Word naredite naslednje.

1. Odprite Wordov dokument, v katerem želite hkrati najti in zamenjati več besed, nato pritisnite druga + F11 tipke za odpiranje Microsoft Visual Basic za aplikacije okno.

2. V Ljubljani Microsoft Visual Basic za aplikacije okno, kliknite Vstavi > Modul. Nato kopirajte spodnjo kodo VBA v okno modula.

Koda VBA: poiščite in zamenjajte več besed hkrati v Wordu

Sub FindAndReplaceMultiItems()
'Update by ExtendOffice 2018/10/25
    Dim xFind As String
    Dim xReplace As String
    Dim xFindArr, xReplaceArr
    Dim I As Long
    Application.ScreenUpdating = False
    xFind = InputBox("Enter items to be found here,seperated by comma: ", "Kutools for Word")
    xReplace = InputBox("Enter new items here, seperated by comma: ", "Kutools for Word")
    xFindArr = Split(xFind, ",")
    xReplaceArr = Split(xReplace, ",")
    If UBound(xFindArr) <> UBound(xReplaceArr) Then
        MsgBox "Find and replace characters must be equal.", vbInformation, "Kutools for Word"
        Exit Sub
    End If
    For I = 0 To UBound(xFindArr)
        Selection.HomeKey Unit:=wdStory
        With Selection.Find
            .ClearFormatting
            .Replacement.ClearFormatting
            .Text = xFindArr(I)
            .Replacement.Text = xReplaceArr(I)
            .Format = False
            .MatchWholeWord = False
        End With
        Selection.Find.Execute Replace:=wdReplaceAll
    Next
    Application.ScreenUpdating = True
End Sub

3. Pritisnite F5 tipko za zagon kode.

4. V prvem Kutools za Word v pogovorno okno vnesite več besed, ki jih boste našli in zamenjali, v besedilno polje in jih ločite z vejico, nato kliknite OK . Oglejte si posnetek zaslona:

5. V drugem Kutools za Word v pogovorno okno vnesite nove besede, ki jih boste zamenjali (te besede je treba ločiti tudi z vejicami), in kliknite na OK gumb.

Opomba: V tem primeru vsi "KTE" v tem dokumentu bo nadomeščen z "Novo", in "KTO" in "KTW" bo nadomeščen z "Test" in "Končaj". Prosimo, spremenite jih glede na vaše potrebe.


Preprosto poiščite in zamenjajte več besed hkrati v Wordu z neverjetno funkcijo

O Serijsko iskanje in zamenjava značilnost Kutools za Word lahko pomaga pri lažjem iskanju in zamenjavi različnih besedil v dokumentu ali v več dokumentih hkrati.

Preden uporabite to funkcijo, si vzemite nekaj minut najprej ga prenesite in namestite.

1. Zaženite aplikacijo Microsoft Word, kliknite Kutools Plus > Serijsko iskanje in zamenjava.

2. V Ljubljani Serijsko iskanje in zamenjava okno, nastavite na naslednji način.

  • 2.1 kliknite gumb> Dodaj datoteko or dodaj mapo da dodate enega ali več dokumentov, v katerih boste našli in zamenjali več besed.
  • 2.2 Kliknite na Dodaj vrstico gumb, da vstavite polja za iskanje in zamenjavo. Če želite hkrati najti in zamenjati tri različna besedila, ustvarite tri vrstice.
  • 2.3 V vsako vrstico vnesite obstoječe besede, ki jih boste zamenjali z novo Najdi in nato vnesite nove besede v Zamenjaj stolpec.
  • 2.4 Navedite Vrsta iskanja za vsako vrstico.
  • 2.5 V Poišči v stolpec izberite, kje uporabiti najdi in zamenjaj. Vključuje Glavni dokument, Glava in Noga v tem oddelku. Izberete lahko enega od njih, dva ali vse glede na vaše potrebe.
  • 2.6. Kliknite Zamenjaj za zagon operacije. Oglejte si posnetek zaslona:

Nato se v izbranih dokumentih hkrati nadomestijo določene besede.

Nasvet: Rezultat lahko označite z barvo ozadja, tako da v polju določite določeno barvo Označite stolpec za vrstico.

  Če želite imeti brezplačno (60-dnevno) preskusno različico tega pripomočka, kliknite, če ga želite prenestiin nato nadaljujte z uporabo postopka v skladu z zgornjimi koraki.


Priporočena orodja za produktivnost besed

 

Kutools za Word - Več kot 100 naprednih funkcij za Word, prihranite 50% časa

  • Zapletene in ponavljajoče se operacije je mogoče enkrat obdelati v nekaj sekundah.
  • V Wordov dokument hkrati vstavite več slik v mape.
  • Združite in združite več datotek Word v mapah v eno z želenim vrstnim redom.
  • Trenutni dokument razdelite na ločene dokumente glede na naslov, prelom odseka ali druga merila.
  • Pretvarjanje datotek med dokumenti Doc in Docx, Docx in PDF, zbirka orodij za pogoste pretvorbe in izbiro itd. ...
Komentarji (21)
Ocene še ni. Bodite prvi in ​​ocenite!
Ta komentar je moderator na spletnem mestu minimiziral
Toto jsem hledal, jen potřebuji pro hledaný text přidat nějaké formátování. Jak toho dosáhnu?
Ta komentar je moderator na spletnem mestu minimiziral
ali bo to delovalo v pisarni Excel 365
Ta komentar je moderator na spletnem mestu minimiziral
Ali obstaja način, da to naredite občutljivo na velike in male črke?
Ta komentar je moderator na spletnem mestu minimiziral
Živjo, to dobro deluje z angleškimi besedami. Zdaj delam dokument, kjer prevajam iz angleščine v gudžarati. Torej, ko uporabim to (Najdi angleške besede) in (Zamenjaj z besedami Gujarati), se spremeni, vendar je videti kot "???". Ne prikazuje gudžaratske besede, ampak samo vprašaj? Še kakšna pomoč? prosim.
Ta komentar je moderator na spletnem mestu minimiziral
Pozdravljeni Shailesh, soočam se z isto težavo. Ste našli rešitev za to. Prav tako poskušam ugotoviti, kako preiti iz kitajščine v angleščino.
Ta komentar je moderator na spletnem mestu minimiziral
Kako najti in izbrati več besed hkrati
Ta komentar je moderator na spletnem mestu minimiziral
Hi,
Ko zaženete kodo, se prikaže pogovorno okno Kutools za Excel, vnesite ključne besede, ki jih boste našli, in jih ločite z vejicami.
Ta komentar je moderator na spletnem mestu minimiziral
Živjo, kako se lahko ta makro spremeni, da sprejme več ključnih besed? Imam približno 170 besed, ki bi jih rad našel in zamenjal
Ta komentar je moderator na spletnem mestu minimiziral
Živjo JM,
Ko zaženete kodo, se prikaže pogovorno okno Kutools za Excel, vnesite ključne besede, ki jih boste našli, in jih ločite z vejicami.
Ta komentar je moderator na spletnem mestu minimiziral
Živjo! Najprej čestitke za vaše delo: ta makro je zelo uporaben in zanimiv! Kljub temu bi rad, da mi pomagate pri eni stvari. Sem lektor in bi rad, da bi bili nadomestki označeni z zeleno ali rdečo barvo. Kako lahko to storim? Ali obstaja kodna vrstica, ki bi jo lahko uporabil?
Ta komentar je moderator na spletnem mestu minimiziral
Živjo, funkcija Paketno iskanje in zamenjava Kutools za Word lahko popolnoma reši vašo težavo, lahko poskusite.
Ta komentar je moderator na spletnem mestu minimiziral
Ko pritisnete Zamenjaj, gre samo v Predogled in ne naredi ničesar več.
Ta komentar je moderator na spletnem mestu minimiziral
Živjo Ajs, vse zahtevane besede so bile uspešno zamenjane naenkrat po pritisku na gumb Zamenjaj. Gre na zavihek Predogled, da vam pomaga vedeti, koliko besed je bilo uspešno zamenjanih. Po tem zaprite pogovorno okno.
Ta komentar je moderator na spletnem mestu minimiziral
Kaj pa, če poskušam zamenjati vejice?
Ta komentar je moderator na spletnem mestu minimiziral
Koda VBA ne more pomagati pri zamenjavi vejic. Za dosego lahko uporabite Kutools.
Ta komentar je moderator na spletnem mestu minimiziral
V prvem navodilu (Poišči in zamenjaj več besed hkrati v Wordu s kodo VBA) ne najde primerov, ko beseda, ki jo je treba zamenjati, pade na sredino besede (na primer .com za imenom spletnega mesta) . Ali je to mogoče spremeniti v to?
Ta komentar je moderator na spletnem mestu minimiziral
Hvala za projekt, ali bi ga lahko naredili tako, da lahko črke zamenjamo tudi z besedami. Na primer, če želim spremeniti Dollar v DoLLar, ne deluje.
Ta komentar je moderator na spletnem mestu minimiziral
Chào bạn, có cách nào thay thế RẤT NHIỀU cụm từ bằng RẤT NHIỀU cụm từ khác (nhập từng cụm từ rất mất thời gian) bằng cách m lập một file trong đó có 2 cột, 1 cột là cụm từ nguồn và cột 2 là cụm từ đích được không? rất cám ơn bạn.
Ta komentar je moderator na spletnem mestu minimiziral
Živjo Nguyễn Phúc Lâm,
Priporočam, da za rešitev te težave uporabite funkcijo Paketno iskanje in zamenjava programa Kutools for Word (druga metoda v tej objavi).
V pogovornem oknu Najdi in zamenjaj lahko po ustvarjanju dveh stolpcev, ki ju potrebujete, shranite trenutne nastavitve kot scenarij za prihodnjo uporabo.
https://www.extendoffice.com/images/stories/comments/comment-picture-zxm/find_and_replace.png
Ta komentar je moderator na spletnem mestu minimiziral
Cám ơn Crystal, cách này có thể áp dụng với một số lượng nhỏ các cụm từ, nếu với số lượng các cụm từ lớn (hơn 1000, hơn 10000.. cụm từ) thì rất khó để có thể nhập thủ công. Vậy có cách nào khác không bạn? Cám ơn bạn đã trả lời
Ta komentar je moderator na spletnem mestu minimiziral
Živjo Nguyễn Phúc Lâm,
Začasno ne morem rešiti te težave s kodo VBA, ker je nekoliko zapletena. Ta funkcija se bo upoštevala za nadgradnjo v naslednji izdaji. Oprostite za nevšečnosti.
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