Turinys
Programoje "Microsoft Excel" rasti ir pakeisti kelias teksto ar skaitines reikšmes yra įprastas scenarijus. Galite naudoti komandą Rasti ir pakeisti, taikyti įvairias funkcijas ir formules arba net sukurti naudotojo apibrėžtus įrankius, kurie pasitarnautų šiems tikslams. Šiame straipsnyje susipažinsite su visais galimais ir greitais kelių reikšmių radimo ir pakeitimo būdais, pateikdami paprastus pavyzdžius ir tinkamus paaiškinimus.
Atsisiųsti praktikos sąsiuvinį
Galite atsisiųsti "Excel" sąsiuvinį, kurį naudojome rengdami šį straipsnį.
Rasti ir pakeisti kelias reikšmes.xlsx6 greiti būdai, kaip rasti ir pakeisti kelias vertes "Excel" programoje
1. Naudokite "Excel" kelių verčių radimo ir pakeitimo įrankį
"Excel" programoje, Rasti ir pakeisti yra naudingiausias įrankis, kai reikės pakeisti reikšmę. Jį galime naudoti įvairiais tikslais. Tolesniuose poskyriuose pažiūrėkime, kaip šis įrankis veikia įvairių kriterijų atveju.
i. Rasti ir pakeisti teksto vertes
Toliau pateiktoje lentelėje kai kurie tekstai guli B stulpelis . Darant prielaidą, kad norime pakeisti reikšmę '2020' su '2021' visuose tekstuose.
📌 Žingsniai:
➤ Spauda CTRL+H . Rasti ir pakeisti Atsidarys dialogo langas.
➤ Tipas '2020' į Raskite, ką dėžutė.
➤ Į Pakeisti į įveskite '2021' .
➤ Spustelėkite Pakeisti visus mygtuką.
Kaip toliau pateiktame paveikslėlyje, rasite visus tekstus, kurių pradžioje yra 2021, o anksčiau buvo 2020.
ii. Ieškoti ir pakeisti naudojant "Wild" simbolius
Dabar šių tekstų pradžioje turime skirtingas skaitines vertes. Tačiau visos jos turi tam tikrą formatą "20XX . Šiuo atveju naudosime pakaitinio simbolio paiešką pagal šį skaitmeninį formatą, o paskutiniai du skaitmenys bus pakeisti šiais simboliais '21' . Turime naudoti du klausiamuosius ženklus (??) kaip pakaitiniai simboliai, skirti dviem paskutiniams skaitmenims Rasti ir pakeisti įrankis.
📌 Žingsniai:
➤ Spauda CTRL+H dar kartą atidaryti Rasti ir pakeisti dialogo langas.
➤ Į Raskite, ką įveskite '20?? '.
➤ Įveskite vertę '2021' į Pakeisti į dėžutė.
➤ Spauda Pakeisti visus ir viskas baigta.
Iš karto pamatysite šiuos išvesties rezultatus.
iii. Rasti ir pakeisti formules
Toliau pateikiamoje lentelėje dabar turime tam tikrus pardavimų duomenis už 5 dienas iš eilės. In C11 langelis , yra bendra pardavimo vertė, tačiau, tarkime, turime sužinoti ten esančių pardavimo duomenų vidurkį. Mums nereikia perrašyti ten esančios formulės su funkcija AVERAGE. Naudosime funkciją Rasti ir pakeisti įrankis, kad būtų lengviau pakeisti formulę.
📌 Žingsniai:
➤ Atidarykite Rasti ir pakeisti dialogo langas.
➤ Į Raskite, ką įveskite "=SUMA .
➤ Tipas "=AVERAGE į Pakeisti į dėžutė.
➤ Spauda Rasti kitą pirmiausia spustelėkite Pakeisti mygtuką.
Išvestyje C11 langelis , iš karto gausite naują apskaičiuotą rezultatą.
iv. Rasti ir pakeisti ląstelių formatus
Taip pat galime keisti ląstelių formatus naudodami Rasti ir pakeisti įrankis. Toliau pateiktoje lentelėje yra keletas eilučių su tam tikra spalva. Pakeisime spalvą kita, tarkime, žalia.
📌 Žingsniai:
➤ Atidarykite Rasti ir pakeisti dialogo langą.
➤ Priešais Raskite, ką langelį, spustelėkite Formatas parinktį ir pasirinkite spalvą, kuri buvo naudojama kai kuriuose atsitiktiniuose lentelės langeliuose.
➤ Spustelėkite antrąjį Formatas skirtuką ir pasirinkite kitą spalvą, kurią norite pakeisti senąja.
➤ Spauda Pakeiskite visus.
Toliau pateiktoje ekrano nuotraukoje matote konkrečias lentelės eilutes su nauja spalva.
Skaityti daugiau: Kaip rasti ir pakeisti vertes naudojant "Excel" užrašus
2. Įterpkite REPLACE funkciją, kad rastumėte ir pakeistumėte kelias vertes "Excel" programoje
Jei nenorite naudoti Rasti ir pakeisti įrankį, tada galite naudoti REPLACE funkcija . Šią funkciją turite taikyti naujame stulpelyje arba ląstelių intervale, kuriame seni teksto duomenys bus pakeisti naujais. Vykdydami šį procesą galite išsaugoti ir senus teksto duomenis.
Toliau pateiktame paveikslėlyje yra du stulpeliai, kurių stulpelis su Naujas tekstas antraštėje bus rodomi pakeisti tekstai.
Pirmajame išėjime Ląstelė C5 , reikiamą formulę su PAKEISTI funkcija bus:
=REPLACE(B5,1,4,2021) 
Paspaudus Įveskite ir naudojant Užpildymo rankena automatiškai užpildyti likusius langelius, iš karto gausite naujas teksto reikšmes. Čia pakeitėme reikšmę '2021' su '2022' visiems tekstams.
3. Taikykite įterptą SUBSTITUTE formulę, kad rastumėte ir pakeistumėte kelias reikšmes
Funkcija SUBSTITUTE pakeičia esamą tekstą nauju tekstu teksto eilutėje. SUBSTITUTAS funkciją, jei reikia pakeisti kelias vertes.
Toliau pateiktame paveikslėlyje, B stulpelis guli su atsitiktiniais teksto duomenimis. Dešinėje esančioje lentelėje pateikiamos reikšmės, kurias reikia pakeisti naujomis.
Pirmajame išėjime Ląstelė C5 , atitinkama formulė bus tokia:
=SUBSTITUTE(SUBSTITUTAS(SUBSTITUTAS(B5:B10, E5, F5), E6, F6), E7, F7) 
Dabar paspauskite Įveskite ir iš karto gausite masyvą su naujomis teksto reikšmėmis. Šioje formulėje naudojome SUBSTITUTAS funkciją tris kartus, nes reikėjo pakeisti tris skirtingas reikšmes, esančias po Rasti antraštė E skiltis.
🔎 Kaip veikia formulė?
- Vidinis SUBSTITUTAS funkcija pakeičia vertę '2018' su '2019' .
- Antrasis SUBSTITUTAS funkcija ieško '2020' ir pakeičia jį į '2021' .
- Išorinis SUBSTITUTAS funkcijų paieška '2022' ir pakeičia jį '2023' .
Panašūs skaitiniai:
- Kaip pakeisti specialiuosius simbolius programoje "Excel" (6 būdai)
- Kelių simbolių pakeitimas programoje "Excel" (6 būdai)
4. Naudokite XLOOKUP funkciją, norėdami ieškoti ir pakeisti kelias vertes "Excel" programoje
Jei esate "Excel 365 naudotojas, tada galite naudoti XLOOKUP funkcija . XLOOKUP funkcija ieško atitikmens diapazone arba masyve ir grąžina atitinkamą elementą antrajame diapazone arba masyve.
Toliau pateiktame duomenų rinkinyje yra keletas teksto reikšmių Senas tekstas stulpelyje. Antroje lentelėje dešinėje pateikiami duomenys, kurių reikia ieškoti, ir tie, kuriuos reikia pakeisti vienu metu. Jei funkcija negali rasti pateiktų reikšmių, tuomet senieji tekstai liks tokie patys, kaip ir anksčiau, esantys Naujas tekstas skiltis.
Taigi, reikiama formulė su XLOOKUP funkcija pirmajame išėjime Ląstelė C5 turėtų būti:
=XLOOKUP($B5,$E$5:$E$10,$F$5:$F$10,$B5) 
Paspaudus Įveskite ir automatiškai užpildžius visą stulpelį, iš karto bus rodomi šie rezultatai.
5. Sujunkite IFNA ir VLOOKUP funkcijas, kad rastumėte ir pakeistumėte kelias vertes
Dabar naudosime alternatyvią formulę XLOOKUP funkciją, o ši formulė yra ir visose "Excel" versijose. Turime sujungti IFNA ir VLOOKUP funkcijos čia.
Svetainė VLOOKUP funkcija ieško reikšmės kairiausiame lentelės stulpelyje ir grąžina toje pačioje eilutėje esančią reikšmę iš nurodyto stulpelio. VLOOKUP funkcija nepateikia jokio pranešimo, jei nerandama paieškos vertė, todėl ji grąžins #N/A Norint išspręsti šią problemą, reikia naudoti IFNA funkciją, kad galėtumėte pritaikyti ir apibrėžti klaidos pranešimą.
Taigi, reikiama formulė, į kurią įeina ir IFNA ir VLOOKUP išvesties funkcijos Ląstelė C5 bus:
=IFNA(VLOOKUP($B5,$E$5:$F$10,2,FALSE),B5) 
Paspaudus Įveskite ir užpildant likusius langelius, esančius C stulpelis , gausime visus naujus teksto duomenis, kaip parodyta toliau pateiktame paveikslėlyje.
6. Įterpti VBA kodai, skirti sukurti UDF, kad būtų galima rasti ir pakeisti kelias reikšmes
Paskutiniame skyriuje taikysime VBA kodus, kad būtų galima suformuluoti naudotojo apibrėžtą funkciją. Šiame duomenų rinkinyje teksto reikšmės B stulpelis bus pakeistos pakeičiant pradžioje esančias skaitines reikšmes. Pakeičiamos reikšmės ir naujos reikšmės guli dešinėje esančioje lentelėje.
Dabar atlikime toliau nurodytas procedūras, kad sukurtume naudotojo apibrėžtus įrankius ir funkcijas:
📌 1 žingsnis:
➤ Dešiniuoju pelės klavišu spustelėkite pelę ant Lapas pirmiausia pavadinimas.
➤ Pasirinkite parinktį "Peržiūrėti kodus . A VBA bus rodomas langas.
➤ Dabar įklijuokite šiuos kodus:
Option Explicit Sub FindnReplaceMultipleValues() Dim Rng As Range Dim OldText As Range Dim ReplaceData As Range On Error Resume Next Set OldText = Application.InputBox("Select Old Text Range:", "Find And Replace Multiple Values", Application.Selection.Address, Type:=8) Err.Clear If Not OldText Is Nothing Then Set ReplaceData = Application.InputBox("Replace What And With:", "FindAnd Replace Multiple Values", Type:=8) Err.Clear If Not ReplaceData Is Nothing Then Application.ScreenUpdating = False For Each Rng In ReplaceData.Columns(1).Cells OldText.Replace what:=Rng.Value, replacement:=Rng.Offset(0, 1).Value Next Application.ScreenUpdating = True End If End If End Sub ➤ Spauda F5 ir pasirodys toliau pateiktame paveikslėlyje parodytas dialogo langas.
➤ Dabar pasirinkite senus tekstus, kuriuos norite pakeisti, ir paspauskite GERAI .
📌 2 žingsnis:
➤ Dabar atsidarys antrasis dialogo langas, kuriame turėsite pasirinkti visą lentelės intervalą. (D5:E7) nuotraukoje guli dešinėje.
➤ Spauda GERAI .
Kaip toliau pateiktoje ekrano kopijoje, naujus ir pakeistus tekstus matysite B stulpelis pagal Tekstas antraštė.
Baigiamieji žodžiai
Tikiuosi, kad visi šie pirmiau minėti metodai dabar padės jums juos taikyti "Excel" skaičiuoklėse, kai turėsite veiksmingai pakeisti kelis teksto duomenis. Jei turite klausimų ar atsiliepimų, praneškite man komentarų skyriuje. Arba galite peržiūrėti kitus mūsų straipsnius, susijusius su "Excel" funkcijomis šioje svetainėje.
