Turinys
Šioje pamokoje parodysiu, kaip 6 paprasti metodai, kaip "Excel" programoje palyginti dvi eilutes dėl panašumo. Šiuos metodus galite naudoti net ir dideliuose duomenų rinkiniuose, kad rastumėte langelius, kuriuose yra visiškai arba iš dalies panašios eilutės. Šioje pamokoje taip pat sužinosite keletą svarbių "Excel" įrankių ir metodų, kurie bus labai naudingi atliekant bet kokią su "Excel" susijusią užduotį.
Atsisiųsti praktikos sąsiuvinį
Praktikos sąsiuvinį galite atsisiųsti iš čia.
Palyginti dvi eilutes dėl panašumo.xlsm6 paprasti būdai, kaip "Excel" programoje palyginti dvi eilutes dėl panašumo
Norėdami aiškiai paaiškinti veiksmus, pasirinkome glaustą duomenų rinkinį. 7 eilučių ir 2 stulpelius. Iš pradžių visus langelius laikome Bendra formatą. Visiems duomenų rinkiniams turime 2 unikalūs stulpeliai, kurie yra Pardavėjo vardas ir pavardė ir Vardas Nors vėliau, jei reikės, stulpelių skaičių galėsime keisti.
1. Naudojant paryškintų ląstelių taisyklių funkciją
Šiuo pirmuoju metodu pamatysime, kaip palyginti dvi eilutes pagal panašumą naudojant Paryškinti ląstelių taisykles svetainėje Excel . Atlikite toliau nurodytus veiksmus.
Žingsniai:
- Pirmiausia pasirinkite visas ląsteles iš B5 į C10 .
- Tada eikite į Pagrindinis skirtuką ir spustelėkite Sąlyginis formatavimas .
- Čia eikite į Paryškinti ląstelių taisykles ir spustelėkite Dubliuojančios vertės .
- Dabar tiesiog spustelėkite GERAI .
- Todėl turėtų būti išryškintos panašios vertės.
Skaityti daugiau: Kaip palyginti tekstą "Excel" programoje ir paryškinti skirtumus (8 greiti būdai)
2. Naujos taisyklės funkcijos taikymas
Taip pat galime naudoti Nauja taisyklė Excel funkcija, kuri suteikia mums pasirinktines parinktis palyginti dvi eilutes dėl panašumo. Pažiūrėkime, kaip tai padaryti.
Žingsniai:
- Pirmiausia vėl pasirinkite ląsteles iš B5 į C10 .
- Dabar eikite į Sąlyginis formatavimas pagal Pagrindinis skirtuką ir spustelėkite Nauja taisyklė .
- Tada naujame lange pasirinkite formatuokite tik unikalias arba pasikartojančias reikšmes ir spustelėkite Formatas .
- Tada pasirinkite spalvą pagal Užpildykite skirtuką ir spustelėkite GERAI šiame ir kitame lange.
- Todėl išryškės duomenų rinkinyje esančios panašios vertės.
Skaityti daugiau: Palyginkite dvi "Excel" ląsteles ir grąžinkite TRUE arba FALSE (5 greiti būdai)
3. Naudojant lygiavertį operatorių
"Excel" lygybės operatorius gali įvertinti, ar teiginys yra TRUE arba FALSE . Šį simbolį naudosime dviem eilutėms greitai palyginti dėl panašumo. Toliau pateikiami išsamūs veiksmai.
Žingsniai:
- Pirmiausia eikite į langelį D5 ir įterpkite šią formulę:
=B5=C5
- Dabar paspauskite Įveskite ir nukopijuokite šią formulę į kitas ląsteles naudodami Užpildymo rankena .
- Galiausiai tai suteiks TRUE arba FALSE reikšmes pagal tai, ar jos sutampa, ar ne.
4. Palyginimas naudojant EXACT funkciją
TIESIOGINĖ funkcija Excel programoje yra labai naudinga, jei norime palyginti dvi teksto eilutes dėl panašumo. Tam tereikia pateikti dvi eilutes kaip įvesties duomenis šiai funkcijai. Pažiūrėkime, kaip tai vyksta žingsnis po žingsnio.
Žingsniai:
- Norėdami pradėti taikyti šį metodą, dukart spustelėkite ląstelę D5 ir įterpkite toliau pateiktą formulę:
=EXACT(B5,C5)
- Tada paspauskite Įveskite raktą, todėl bus įterptas TRUE jei reikšmės yra labai panašios.
5. Ieškos funkcijos naudojimas
Paieškos funkcija Excel programoje galima rasti vienos eilutės padėtį kitoje eilutėje. Taigi, turėtume galėti naudoti šią funkciją dviem eilutėms palyginti dėl panašumo. Norėdami tai padaryti, atlikite toliau nurodytus veiksmus.
Žingsniai:
- Norėdami pradėti šį metodą, pereikite į langelį D5 ir įveskite šią formulę:
=IFERROR(IF(SEARCH(C5,B5), "Panašus"), "Nepanašus")
- Po to paspauskite Įveskite arba spustelėkite bet kurį tuščią langelį.
- Iš karto gausite rezultatą, ar visi duomenys yra panašūs, ar ne.
🔎 Kaip veikia formulė?
- IEŠKOTI(C5,B5): Šioje dalyje tikroji vertė yra 1 .
- IF(SEARCH(C5,B5), "Panašus"): Ši dalis grąžina rezultatą kaip Panašiai .
- IFERROR(IF(IF(SEARCH(C5,B5), "Panašus"), "Nepanašus"): Taip pat grąžinama galutinė vertė Panašiai .
6. VBA kodo taikymas
Jei esate susipažinę su VBA excel programoje, galite lengvai palyginti dvi eilutes dėl panašumo. Nors mes parašysime šiek tiek ilgesnį kodą, galite tiesiog nukopijuoti šį kodą į savo failą. Pažiūrėkime, kaip parašyti VBA kodą.
Žingsniai:
- Norėdami naudoti šį metodą, eikite į Kūrėjas skirtuką ir pasirinkite "Visual Basic .
- Dabar pasirinkite Įdėkite į VBA langą ir spustelėkite Modulis .
- Tada naujame lange įveskite toliau pateiktą formulę:
Sub Highlight() Dim xRg1 As Range Dim xRg2 As Range Dim xTxt As String Dim xCell1 As Range Dim xCell2 As Range Dim I As Long Dim J As Integer Dim xLen As Integer Dim xDiffs As Boolean On Error Resume Next If ActiveWindow.RangeSelection.Count> 1 Then xTxt = ActiveWindow.RangeSelection.AddressLocal Else xTxt =ActiveSheet.UsedRange.AddressLocal End If lOne: Set xRg1 = Application.InputBox("Range A:", "Select Range", xTxt, , , , , , 8) If xRg1 Is Nothing Then Exit Sub If xRg1.Columns.Count> 1 Or xRg1.Areas.Count> 1 Then MsgBox "Multiple ranges or columns have been selected ", vbInformation, "Similar or Not" GoTo lOne End If lTwo: Set xRg2 =Application.InputBox("Range B:", "Select Range", "", , , , , , 8) If xRg2 Is Nothing Then Exit Sub If xRg2.Columns.Count> 1 Or xRg2.Areas.Count> 1 Then MsgBox "Pasirinkti keli diapazonai arba stulpeliai ", vbInformation, "Panašūs arba ne" GoTo lTwo End If If xRg1.CountLarge xRg2.CountLarge Then MsgBox "Two selected ranges must have the same numberslangelių ", vbInformation, "Panašus arba ne" GoTo lTwo End If xDiffs = (MsgBox("Spustelėkite Taip, kad išryškintumėte panašumus, spustelėkite Ne, kad išryškintumėte skirtumus ", vbYesNo + vbQuestion, "Panašus arba ne") = vbNo) Application.ScreenUpdating = False xRg2.Font.ColorIndex = xlAutomatic For I = 1 To xRg1.Count Set xCell1 = xRg1.Cells(I) Set xCell2 = xRg2.Cells(I)Jei xCell1.Value2 = xCell2.Value2 Tada Jei ne xDiffs Tada xCell2.Font.Color = vbRed Else xLen = Len(xCell1.Value2) For J = 1 To xLen Jei ne xCell1.Characters(J, 1).Text = xCell2.Characters(J, 1).Text Tada Exit For Next J Jei ne xDiffs Tada Jei J 1 Tada xCell2.Characters(1, J -1).Font.Color = vbRed End If Else If J <= Len(xCell2.Value2) Then xCell2.Characters(J, Len(xCell2.Value2) - J + 1).Font.Color = vbRed End If End If End If End If Next Application.ScreenUpdating = True End Sub
- Tada atidarykite makrokomandą iš Kūrėjas skirtuką spustelėdami Makrokomandos .
- Dabar, kai Makro langą, pasirinkite Paryškinti makrokomandą ir spustelėkite Paleisti .
- Po to įterpkite pirmąjį diapazoną į Pasirinkite diapazoną langą ir spustelėkite GERAI .
- Tada pasirinkite antrąjį intervalą ir dar kartą spustelėkite GERAI .
- Čia paspauskite Taip patvirtinti.
- Dėl to VBA kodas išryškins panašią vertę ląstelėje C8 .
Išvada
Tikiuosi, kad jums pavyko pritaikyti metodus, kuriuos parodžiau šioje pamokoje, kaip "Excel" programoje palyginti dvi eilutes dėl panašumo. Kaip matote, yra nemažai būdų, kaip tai pasiekti. Taigi išmintingai pasirinkite metodą, kuris geriausiai tinka jūsų situacijai. Jei įstrigote bet kuriame iš žingsnių, rekomenduoju juos atlikti kelis kartus, kad išsiaiškintumėte bet kokią painiavą. Galiausiai, norėdami sužinoti daugiau Excel metodus, vadovaukitės mūsų ExcelWIKI Jei turite klausimų, praneškite man komentaruose.