Puteți să utilizați următoarele metode pentru a compara datele din două coloane de foaie Microsoft Excel și a găsi intrări dublate. 

Metoda 1: Utilizați o formulă de foaie de lucru

  1. Începeți Excel.

  2. Într-o foaie de lucru nouă, introduceți următoarele date ca exemplu (lăsați coloana B necompletată):

    A

    B

    C

    1

    1

    3

    2

    2

    5

    3

    3

    8

    4

    4

    2

    5

    5

    0

  3. Tastați următoarea formulă în celula B1:

    =IF(ISERROR(MATCH(A1,$C$1:$C$5,0)),"",A1)

  4. Selectați celula B1 până la B5.

  5. În Excel 2007 și versiuni mai recente de Excel, selectați Umplere în grupul Editare, apoi selectați În jos.

    Numerele dublate sunt afișate în coloana B, ca în exemplul următor: 

    A

    B

    C

    1

    1

    3

    2

    2

    2

    5

    3

    3

    3

    8

    4

    4

    2

    5

    5

    5

    0

Metoda 2: Utilizarea unei macrocomenzi Visual Basic calcul

Avertisment: Microsoft furnizează exemple de programare doar pentru ilustrație, fără garanție exprimată sau implicită. This includes, but is not limited to, the implied warranties of merchantability or fitness for a particular purpose. Acest articol presupune că sunteți familiarizat cu limbajul de programare prezentat și cu instrumentele utilizate pentru crearea și depanarea procedurilor. Inginerii de asistență Microsoft pot ajuta la explicarea funcționalității unei anumite proceduri. Totuși, ele nu vor modifica aceste exemple pentru a furniza funcționalități suplimentare sau proceduri de construcție care să îndeplinească cerințele dvs. specifice.

Pentru a utiliza Visual Basic macrocomandă de comparare a datelor din două coloane, urmați pașii din exemplul următor:

  1. Porniți Excel.

  2. Apăsați ALT+F11 pentru a porni Visual Basic editor.

  3. În meniul Inserare, selectați Modul.

  4. Introduceți următorul cod într-o foaie de modul:

    Sub Find_Matches()
    Dim CompareRange As Variant, x As Variant, y As Variant
    ' Set CompareRange equal to the range to which you will
    ' compare the selection.
    Set CompareRange = Range("C1:C5")
    ' NOTE: If the compare range is located on another workbook
    ' or worksheet, use the following syntax.
    ' Set CompareRange = Workbooks("Book2"). _
    ' Worksheets("Sheet2").Range("C1:C5")
    '
    ' Loop through each cell in the selection and compare it to
    ' each cell in CompareRange.
    For Each x In Selection
    For Each y In CompareRange
    If x = y Then x.Offset(0, 1) = x
    Next y
    Next x
    End Sub
  5. Apăsați ALT+F11 pentru a reveni la Excel.

    1. Introduceți următoarele date ca exemplu (lăsați coloana B necompletată):
       

      A

      B

      C

      1

      1

      3

      2

      2

      5

      3

      3

      8

      4

      4

      2

      5

      5

      0

  6. Selectați celula A1-A5.

  7. În Excel versiunile 2007 și mai recente de Excel, selectați fila Dezvoltator, apoi macrocomenzi în grupul Cod.

    Notă: Dacă nu vedeți fila Dezvoltator, poate fi nevoie să o activați. Pentru a face acest lucru, selectați > opțiuni > panglica Particularizare ,apoi selectați fila Dezvoltator în caseta de particularizare din partea dreaptă.

  8. Faceți Find_Matchespe , apoi pe Rulare.

    Numerele dublate sunt afișate în coloana B. Numerele care se potrivesc vor fi puse lângă prima coloană, după cum este ilustrat aici:

    A

    B

    C

    1

    1

    3

    2

    2

    2

    5

    3

    3

    3

    8

    4

    4

    2

    5

    5

    5

    0

Aveți nevoie de ajutor suplimentar?

Extindeți-vă competențele
Explorați instruirea
Fiți primul care obține noile caracteristici
Alăturați-vă la Microsoft Insider

V-a fost de ajutor această informație?

Cât de mulțumit sunteți de calitatea traducerii?

Ce v-a afectat experiența?

Aveți feedback suplimentar? (Opțional)

Vă mulțumim pentru feedback!

×