ID articol: 213367 - View products that this article applies to.
Măriți totul | Reduceți totul

În această pagină

Rezumat

Acest articol descrie două metode care se pot utiliza pentru a compara datele din două coloane dintr-o foaie de lucru Microsoft Excel ?i a găsi intrări dublate.

Informații suplimentare

Metoda 1: Utilizarea unei formule de foaie de lucru

Pentru a utiliza o formulă de foaie de lucru pentru a compara datele din două coloane, urma?i ace?ti pa?i:
  1. Porni?i Excel.
  2. Într-o foaie de lucru nouă, introduce?i următoarele date (lăsa?i coloana B goală):
    A1: 1   B1:     C1: 3
    A2: 2   B2:     C2: 5
    A3: 3   B3:     C3: 8
    A4: 4   B4:     C4: 2
    A5: 5   B5:     C5: 0
    					
  3. Tasta?i următoarea formulă în celula B1:
    =IF(ISERROR(MATCH(A1,$C$1:$C$5,0)),"",A1)
  4. Selecta?i celulele B1:B5.
  5. În Microsoft Office Excel 2003 ?i în versiunile anterioare de Excel, indica?i spre Umplere (Fill) din meniul Editare (Edit), apoi face?i clic pe În jos (Down).

    In Microsoft Office Excel 2007 și Excel 2010, face?i clic pe Umplere din grupul Editare, apoi face?i clic pe În jos.

    Numerele dublate se afi?ează în coloana B, ca în următorul exemplu:
       A1: 1   B1:     C1: 3
       A2: 2   B2: 2   C2: 5
       A3: 3   B3: 3   C3: 8
       A4: 4   B4:     C4: 2
       A5: 5   B5: 5   C5: 0
    					

Metoda 2: Utilizarea unei macrocomenzi Visual Basic

Microsoft furnizează exemple de programare doar ca exemplificare, fără garan?ie expresă sau implicită. Aceasta include, dar nu se limitează la garan?ii de vandabilitate sau de potrivire la un anumit scop. Acest articol presupune că sunte?i familiarizat cu limbajul de programare care se expune ?i cu instrumentele utilizate pentru a crea ?i a depana proceduri. Speciali?tii în asisten?ă de la Microsoft pot ajuta la explicarea func?ionalită?ii unei anumite proceduri. Însă, ei nu vor modifica aceste exemple pentru a furniza func?ionalitate suplimentară ?i nu vor construi proceduri pentru a răspunde cerin?elor dvs. specifice. Pentru a utiliza o macrocomandă Visual Basic pentru a compara datele din două coloane, utiliza?i pa?ii din următorul exemplu:
  1. Porni?i Excel.
  2. Apăsa?i ALT+F11 pentru a porni editorul Visual Basic.
  3. În meniul Insert, face?i clic pe Module.
  4. Introduce?i următorul cod într-o foaie de modul:
    Sub Find_Matches()
        Dim CompareRange As Variant, x As Variant, y As Variant
        ' Setează CompareRange egal cu zona cu care ve?i
        ' compara selec?ia.
        Set CompareRange = Range("C1:C5")
        ' NOTĂ: Dacă zona de comparare se află în alt registru de lucru
        ' sau în altă foaie de lucru, utiliza?i următoarea sintaxă:
        ' Set CompareRange = Workbooks("Registru2"). _
        '   Worksheets("Foaie2").Range("C1:C5")
        '
        ' Ciclează prin fiecare celulă din selec?ie ?i le compară
        ' cu fiecare celulă din 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.
  6. Introduce?i următoarele date (lăsa?i coloana B goală):
    A1: 1   B1:     C1: 3
    A2: 2   B2:     C2: 5
    A3: 3   B3:     C3: 8
    A4: 4   B4:     C4: 2
    A5: 5   B5:     C5: 0
    					
  7. Selecta?i zona A1:A5.
  8. În Excel 2003 ?i în versiunile anterioare de Excel, indica?i spre Macrocomandă (Macro) din meniul Instrumente (Tools), apoi face?i clic pe Macrocomenzi (Macros).

    In Excel 2007 și Excel 2010, face?i clic pe fila Dezvoltator, apoi pe Macrocomandă din grupul Cod.
  9. Face?i clic pe Find_Matches, apoi pe Executare.
Numerele dublate se afi?ează în coloana B. Numerele care coincid vor fi trecute alături de prima coloană, cum se ilustrează aici:
   A1: 1   B1:     C1: 3
   A2: 2   B2: 2   C2: 5
   A3: 3   B3: 3   C3: 8
   A4: 4   B4:     C4: 2
   A5: 5   B5: 5   C5: 0
				
Notă Acesta este un articol „FAST PUBLISH” creat direct în cadrul organizației de asistență Microsoft. Informațiile conținute aici sunt furnizate ca atare, drept răspuns la problemele care apar. Din cauza rapidității cu care sunt puse la dispoziție, materialele pot avea erori tipografice și pot fi revizuite în orice moment, fără înștiințare. Consultați Termeni de utilizare pentru alte considerente.

Proprietă?i

ID articol: 213367 - Ultima examinare: 30 ianuarie 2014 - Revizie: 1.0
Se aplică la:
  • Microsoft Excel 2010
  • Microsoft Office Excel 2007
  • Microsoft Office Excel 2003
Cuvinte cheie: 
kbdtacode kbhowto kbprogramming KB213367

Trimite?i feedback

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com