Excel vertaa kahta saraketta ja korosta löydettäessä

Translate

Minulla on Excel-tiedosto, jonka sarakkeessa A on 10000 riviä, jotkut arvot ovat samat.

Esimerkki:

A1 - P7767

A2 - P3443

A3 - P7767

A4 - P8746

A5 - P9435

jne...

Minulla on sitten toinen sarake, jossa on 100 riviä, joilla on joitain sarakkeessa A olevia arvoja,

B1 - P7767

B2 - P8746

jne...

Minun on korostettava kaikki sarakkeen A solut, joissa arvo löytyy mistä tahansa sarakkeen B arvoista

Joten pohjimmiltaan sarake B tarkistaa, löytääkö se saman arvon mistä tahansa sarakkeesta A, jos tosi, korosta solu jättäen solut valkoisiksi, kun arvoa ei löydy sarakkeesta B

Toivon, että olen selittänyt tämän hyvin, olen tehnyt joitain tutkimuksia ja uskon, että minun on käytettävä ehdollista muotoilua saadakseni tämän tuloksen, mutta olen todella juuttunut käytettävään kaavaan enkä näytä löytävän esimerkkiä verkosta (Ehkä en etsi oikea termi, koska en ole varma siitä, mitä tätä tarkalleen kutsutaan)

This question and all comments follow the "Attribution Required."

Kaikki vastaukset

Translate

Saattaa olla yksinkertaisempi vaihtoehto, mutta VLOOKUPin avulla voit tarkistaa, näkyykö arvo luettelossa (ja VLOOKUP on tehokas kaava, johon on joka tapauksessa päästävä).

Joten A1: lle voit asettaa ehdollisen muodon seuraavalla kaavalla:

=NOT(ISNA(VLOOKUP(A1,$B:$B,1,FALSE)))

Kopioi ja liitä erityinen> Muotot kopioidaksesi ehdollisen muodon sarakkeen A muihin soluihin.

Mitä yllä oleva kaava tekee:

  • VLOOKUP etsii solun A1 (ensimmäinen parametri) arvoa koko saraketta B vastaan ($ B: $ B) ensimmäisessä sarakkeessa (se on kolmas parametri, joka on tässä redundantti, mutta tyypillisesti VLOOKUP etsii taulukkoa eikä sarake). Viimeinen parametri FALSE määrittää, että vastaavuuden on oltava tarkka eikä vain lähin vastaavuus.
  • VLOOKUP palauttaa #ISNA: n, jos vastaavuutta ei löydy, joten NOT (ISNA (...)) palauttaa arvon true kaikille soluille, joilla on vastaavuus sarakkeessa B.
Lähde
Translate

Yksinkertainen kaava käyttää on

=COUNTIF($B:$B,A1)

Määritetty kaava on solulle A1. Kopioi ja liitä erikoismuoto koko sarakkeeseen A

Lähde
Translate

HUOMAUTUS: Haluat ehkä poistaa päällekkäiset kohteet (esim. Päällekkäiset merkinnät samassa sarakkeessa), ennen kuin teet nämä vaiheet väärän positiivisen estämiseksi.

  1. Valitse molemmat sarakkeet
  2. Napsauta Ehdollinen muotoilu
  3. napsauta Korosta solusäännöt
  4. napsauta Kopioi arvot (oletusarvojen pitäisi olla OK)
  5. Kopiot on nyt korostettu punaisella:

enter image description here

Lähde
Translate

Helpoin tapa tehdä se, ainakin minulle, on:

Ehdollinen muoto-> Lisää uusi sääntö-> Aseta oma kaava:

=ISNA(MATCH(A2;$B:$B;0))

Missä A2 on sarakkeen A ensimmäinen elementti, jota verrataan, ja B on sarake, josta A: n elementtiä haetaan.

Kun olet asettanut kaavan ja valinnut muodon, käytä tätä sääntöä kaikkiin sarakkeen elementteihin.

Toivottavasti tämä auttaa

Lähde
Translate

A1 -> ehdollinen muotoilu -> solun arvo on B1 -> muoto: mitä haluat

Toivottavasti se auttaa

Lähde
Translate

Oletetaan, että haluat verrata sarakkeita A ja H samassa laskentataulukossa.

Sinun täytyy mennä toiseen sarakkeeseen näiden 2 sarakkeen viereen ja liittää tämä kaava: = (Sheet1! A: A = Sheet1! H: H) tämä näyttää sarakkeessa FALSE tai TRUE. Joten voit käyttää tätä uutta saraketta värittämään ei-yhteensopivat arvot ehdollisen värin muotoiluominaisuuden avulla.

Lähde
Translate

Yritin verrata AB-sarakkeita ja tuoda esiin yhtä suurta tekstiä, mutta yläpuolella olevien komentojen avulla jotkut tekstit eivät sopineet ollenkaan. Joten käytin muotoa (VBA-makro vertailla kahta saraketta ja väri korosta solujen eroja) -koodeja ja muokkain muutamia asioita mukauttamaan sitä sovellukseeni ja etsimään haluamasi sarakkeen (napsauttamalla sitä). Minun tapauksessani käytän suuria ja erilaisia rivejä kussakin sarakkeessa. Toivottavasti tämä auttaa:

Ala ABTextCompare ()

Dim Report As Worksheet
Dim i, j, colNum, vMatch As Integer
Dim lastRowA, lastRowB, lastRow, lastColumn As Integer
Dim ColumnUsage As String
Dim colA, colB, colC As String
Dim A, B, C As Variant

Set Report = Excel.ActiveSheet
vMatch = 1

'Select A and B Columns to compare
On Error Resume Next
 Set A = Application.InputBox(Prompt:="Select column to compare", Title:="Column A", Type:=8)
  If A Is Nothing Then Exit Sub
colA = Split(A(1).Address(1, 0), "$")(0)
 Set B = Application.InputBox(Prompt:="Select column being searched", Title:="Column B", Type:=8)
   If A Is Nothing Then Exit Sub
  colB = Split(B(1).Address(1, 0), "$")(0)
 'Select Column to show results
 Set C = Application.InputBox("Select column  to show results", "Results", Type:=8)
    If C Is Nothing Then Exit Sub
  colC = Split(C(1).Address(1, 0), "$")(0)

'Get Last Row
lastRowA = Report.Cells.Find("", Range(colA & 1), xlFormulas, xlByRows, xlPrevious).Row - 1 ' Last row in column A
lastRowB = Report.Cells.Find("", Range(colB & 1), xlFormulas, xlByRows, xlPrevious).Row - 1 ' Last row in column B

 Application.ScreenUpdating = False
'***************************************************
For i = 2 To lastRowA
      For j = 2 To lastRowB
          If Report.Cells(i, A.Column).Value <> "" Then
              If InStr(1, Report.Cells(j, B.Column).Value, Report.Cells(i, A.Column).Value, vbTextCompare) > 0 Then
                  vMatch = vMatch + 1
                  Report.Cells(i, A.Column).Interior.ColorIndex = 35 'Light green background
                  Range(colC & 1).Value = "Items Found"
                  Report.Cells(i, A.Column).Copy Destination:=Range(colC & vMatch)
                  Exit For
              Else
                  'Do Nothing
              End If
          End If
      Next j
  Next i
If vMatch = 1 Then
    MsgBox Prompt:="No Itmes Found", Buttons:=vbInformation
End If
'***************************************************
Application.ScreenUpdating = True

End Sub

Lähde
Translate

Älä tee niin paljon töitä kavereita .. Paina vain Ctr ja valitse Colum one, paina Ctr ja valitse colum two. Napsauta sitten ehdollinen muotoilu -> Korosta solusäännöt -> Tasaa.

ja siinä se. olet valmis. :)

Lähde
Leave a Reply
You must be logged in to post a answer.
Kirjailijasta