Namig: drugi jeziki so prevedeni v Google. Lahko obiščete English različico te povezave.
Vpiši se
x
or
x
x
Registracija
x

or

Kako ustvariti makro kodo za doseganje in zamenjavo besedila v Excelu?

Običajno uporabljamo vgrajeno funkcijo »Poišči in zamenjaj« za iskanje in zamenjavo vrednosti v Excelu. Pravzaprav lahko v Excelu najdete in zamenjate neposredno z makro kodo. V tem članku boste izvedeli, kako ustvariti makro kodo za doseganje in zamenjavo besedila v Excelu.

Ustvarite makro kodo za doseganje in zamenjavo besedila v Excelu


Ustvarite makro kodo za doseganje in zamenjavo besedila v Excelu


Če želite ustvariti makro kodo za iskanje in zamenjavo besedila v Excelu, naredite naslednje.

1. Pritisnite druga + F11 tipke za odpiranje Microsoft Visual Basic za aplikacije okno.

2. V Ljubljani Microsoft Visual Basic za aplikacije okno, kliknite Vstavi > Moduli. Nato kopirajte kodo VBA pod kodno okno.

VBA koda: Ustvarite makro kodo, da bi dosegli in nadomestili besedilo v Excelu

Sub FindandReplaceText()
'Update by Extendoffice 2018/5/24
    Dim xFind As String
    Dim xRep As String
    Dim xRg As Range
    On Error Resume Next
    Set xRg =Cells
    xFind = Application.InputBox("word to search:", "Kutools for Excel", , , , , 2)
    xRep = Application.InputBox("word to replace:", "Kutools for Excel", , , , , 2)
    If xFind = "False" Or xRep = "False" Then Exit Sub
    xRg.Replace xFind, xRep, xlPart, xlByRows, False, False, False, False
End Sub

3. Pritisnite F5 ključ za zagon kode.

4. V prvem Kutools za Excel v pogovornem oknu vnesite besedilo ali vrednost, ki jo iščete, in nato kliknite OK gumb. Prikaz slike:

5. V drugem Kutools za Excel v pogovornem oknu vnesite besedilo ali vrednost, ki jo boste zamenjali, in kliknite na OK gumb.

Potem se vsa določena besedila takoj zamenjajo z želenim besedilom.

Opombe: Ta koda se uporablja za aktivni delovni list.


Sorodni članki:



Priporočena orodja za produktivnost za Excel

Kutools za Excel vam pomaga, da vedno končate delo pred časom in izstopite iz množice

  • Več kot zmogljive napredne funkcije 300, zasnovane za 1500 delovne scenarije, ki povečujejo produktivnost z 70%, vam dajejo več časa za skrb za družino in uživanje v življenju.
  • Ne potrebujete več pomnilniških formul in VBA kod, od zdaj naprej pa dajate svojim možganom počitek.
  • Postanite strokovnjak za Excel v minutah 3, zapletene in ponavljajoče se operacije lahko opravite v nekaj sekundah,
  • Vsak dan zmanjšajte število operacij tipkovnice in miške, zdaj se poslovite od poklicnih bolezni.
  • 110,000 visoko učinkovite ljudi in 300 + svetovno priznanih podjetij izbiro.
  • Brezplačna preizkusna različica 60 dneva. 60-dnevno jamstvo vračila denarja. 2 let brezplačne nadgradnje in podpore.

Prinaša kartično brskanje in urejanje za Microsoft Office, veliko močnejši od zavihkov brskalnika

  • Office Tab je namenjen za Word, Excel, PowerPoint in druge Office aplikacije: Založnik, Dostop, Visio in Projekt.
  • Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
  • Z 50% poveča vašo produktivnost in vsak dan zmanjša na stotine klikov z miško!
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.