Microsoft Excel 2010 kan lyfta dubblerade värden med hjälp av en förinställd villkorlig formatering kommando , men om du behöver hitta dubbletter med hjälp av ett makro kan du använda Visual Basic for Applications ( VBA ) , som är inbyggd i Microsoft Excel. Medan VBA inte har en funktion som kommer att hitta dubbletter , kan du utnyttja funktionen ANTAL.OM för att ta reda på vilka celler innehar samma information . Instruktioner
1
Öppna Microsoft Excel 2010-fil som innehåller de data som du vill söka efter dubbletter . När tabellen kommer upp , tryck på " Alt " och " F11 " för att ladda VBA konsolen .
2
Högerklicka på kalkylbladet på vänster sida av VBA -skärmen . Flytta musen över " Infoga " och välj " Modul . " Dubbelklicka på den nya modulen som visas några rader under kalkylbladet .
3
Placera markören i det vita utrymmet på höger sida av skärmen . Skriv in " Sub Dupecheck ( ) " och tryck enter . VBA kommer automatiskt in i " End Sub " -kommandot för dig .
4
Placera markören på linjen mellan " Sub " och " Sub End " linjer . Ange följande kodrader : . .
Dim x As Long
Dim endrow As Long
endrow = Range ( " A50000 " ) End ( xlUp ) Rad
Denna kod kommer att skapa två variabler , " endrow " och " x " och sedan fastställer värdet för " endrow . " Denna kod kommer att söka igenom 50.000 rader i en enda kolumn , men om du behöver så titta igenom fler rader , bara öka 50.000 till oavsett antal du behöver . Denna kod är också utformad för att titta igenom kolumn " A ", men du kan enkelt ändra " A " för vad kolumnen bokstav du behöver . Markören
5
Place på nästa rad och skriv in följande kod :
För x = endrow Till 1 Step -1
p Om Application.WorksheetFunction.CountIf ( Range ( " A1 : A " . & x ) , Range ( " A " & x ) Text ) > 1 Then
Range ( " A " & x ) . Interior.Color = RGB ( 200 , 160 , 35 ) katalog
End If
Next x
Detta är kärnan i den kod som kommer att titta igenom varje cell och avgöra om en identisk cell finns ovanför den . Om den hittar en dubblett , kommer det att vända cellen bakgrunden en gul färg . Du kan ändra alla förekomster av " A " om du arbetar på en annan kolumn . Du kan också ändra de tre siffrorna efter " Interior.color " för att ändra vilken färg cellen vänder .
6
Klicka på " x " i det övre högra hörnet av skärmen för att stänga VBA -konsolen . Klicka på " Developer " längst upp på skärmen . Hitta " Macro " -knappen på vänster sida av bandet och klicka på den . Välj " Dupecheck " från listan över tillgängliga makron och klicka på " Kör". Excel kommer nu markera varje exemplar på kolumn med data .
