Sådan sammenlignes data i to kolonner for at finde dubletter i Excel

Du kan bruge følgende metoder til at sammenligne data i to Microsoft Excel-regnearks kolonner og finde dublerede poster. 

Metode 1: Brug en regnearksformel

  1. Start Excel.

  2. I et nyt regneark skal du angive følgende data som eksempel (Lad kolonne B være tom):

    A

    B

    C

    1

    1

    3

    2

    2

    5

    3

    3

    8

    4

    4

    2

    5

    5

    0

  3. Skriv følgende formel i celle B1:

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

  4. Vælg celle B1 til B5.

  5. I Excel 2007 og nyere versioner af Excel skal du vælge Udfyld gruppen redigering og derefter vælge ned.

    De duplikerede numre vises i kolonne B som i følgende eksempel: 

    A

    B

    C

    1

    1

    3

    2

    2

    2

    5

    3

    3

    3

    8

    4

    4

    2

    5

    5

    5

    0

Metode 2: Brug en Visual Basic-makro

Advarsel!: Microsoft leverer kun programmeringseksempler til at blive illustreret uden ansvar, hverken udtrykt eller stiltiende. Dette omfatter, men er ikke begrænset til, de stiltiende garantier for salgbarhed eller egnethed til bestemte formål. I denne artikel forudsættes det, at du kender det programmeringssprog, der bliver påvist, og med de værktøjer, der bruges til at oprette og udføre fejlfindingsprocedurer. Microsofts supportmedarbejdere kan hjælpe med at forklare funktionaliteten i en bestemt procedure. De vil dog ikke ændre disse eksempler for at give tilføjet funktionalitet eller oprette procedurer, der opfylder dine specifikke krav.

Hvis du vil bruge en Visual Basic-makro til at sammenligne dataene i to kolonner, skal du følge trinnene i følgende eksempel:

  1. Start Excel.

  2. Tryk på ALT + F11 for at starte Visual Basic Editor.

  3. I menuen Indsæt skal du vælge modul.

  4. Indtast følgende kode i et modulark:

    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. Tryk på ALT + F11 for at vende tilbage til Excel.

    1. Indtast følgende data som et eksempel (Lad kolonne B være tom):
       

      A

      B

      C

      1

      1

      3

      2

      2

      5

      3

      3

      8

      4

      4

      2

      5

      5

      0

  6. Markér celle a1 til A5.

  7. Vælg fanen udvikler i Excel 2007 og nyere versioner af Excel, og vælg derefter makroer i gruppen kode .

    Bemærk!: Hvis du ikke kan se fanen udvikler , skal du muligvis slå den til. Hvis du vil gøre dette, skal du vælge filer > Indstillinger > Tilpas båndetog derefter vælge fanen udvikler i feltet tilpasning i højre side.

  8. Klik på Find_Matches, og klik derefter på Kør.

    De duplikerede numre vises i kolonne B. De matchende numre bliver lagt ud for den første kolonne, som vist her:

    A

    B

    C

    1

    1

    3

    2

    2

    2

    5

    3

    3

    3

    8

    4

    4

    2

    5

    5

    5

    0

Bemærk!:  Denne side er oversat ved hjælp af automatisering og kan indeholde grammatiske fejl og unøjagtigheder. Det er vores hensigt, at dette indhold skal være nyttigt for dig. Var disse oplysninger nyttige? Her er artiklen på engelsk, så du kan sammenligne.

Udvid dine Office-færdigheder
Gå på opdagelse i kurser
Få nye funktioner først
Bliv Office Insider

Var disse oplysninger nyttige?

Tak for din feedback!

Tak for din feedback! Det lyder, som om det vil kunne hjælpe, hvis du bliver sat i forbindelse med en af vores Office-supportteknikere.

×