Endnu en makro... Tjek for samme indhold i forskellige linier.

Du mener ikke at du ville komme ud for at samme firma har flere kontorer/lagerbygninger, hvor du skal have registreret begge?

Du mener heller ikke at der vil være situationer hvor der er flere selskaber der har samme adresse?

For i så tilfælde, skal du også have mulighed for "ignorer" som ved en simpel stavekontrol.

Jo måske... Derfor ville det jo være fint nok hvis de blot blev markeret med fed, så kunne man selv se dem igennem.

Denne makro markerer alle dubletter med fed.
Bemærk, at du skal markere en område i en kolonne inden du kører makroen.

Public Sub BoldDuplicateRows()
Dim r As Long
Dim N As Long
Dim V As Variant
Dim Rng As Range

On Error GoTo EndMacro
Application.ScreenUpdating = False
Application.Calculation = xlCalculationManual

If Selection.Rows.Count > 1 Then
    Set Rng = Selection
Else
    Set Rng = ActiveSheet.UsedRange.Rows
End If

N = 0
For r = Rng.Rows.Count To 1 Step -1
    V = Rng.Cells(r, 1).Value
    If Application.WorksheetFunction.CountIf(Rng.Columns(1), V) > 1 Then
        Rng.Cells(r, 1).Font.bold = True
        N = N + 1
    End If
Next r

EndMacro:

Application.ScreenUpdating = True
Application.Calculation = xlCalculationAutomatic

End Sub

en område = et område :-)

Egentlig ville det lige så nemt bare at sortere - først efter firma og så slette rækker med uønskede dubletter.
Dernæst kan man sortere efter adresse og bruge samme fremgangsmåde.

Hvis de ikke er sorteret, kan det meget hurtigt blive uoverskueligt - for så kan de 2 linier med samme adresse måske være i linie 20 og 9.432

Ellers skal man kunne "springe" mellem de markerede selskaber!

Kan du ikke nøjes med at bruge betinget formatering ?
Her kan du jo farve og fede alt det du lyster.
Under betinget formatering vælger du
Formel er =tæl.hvis($A$2:$A$10000; A2)>1
Lav dit format og kopier formatet hele vejen til A10000
hvis et firma findes mere end een gang bliver begge formateret.

Også en mulighed, men det giver vel heller ikke nogen mening, med mindre man sorterer først, og så er det vel ligemeget .... :-)

Det kan der måske være noget om, men fordelen er at det er aktivt hele tiden og når man tasten et firma til der er i listen i forvejen bliver begge markeret med det samme.

Ja, jeg er enig i, at det er bedre end en makro, men hvis man laver en sortering, som man nok under alle omstændigheder skal lave, står firmaerne alligevel under hinanden, og så hjælper det ikke så meget at alle dubletter er med fed.

Ingen af delene ser ud til at virke... Makroen står bare og kører i meget lang tid... Stoppede den efter 10 min.

Betinget formatering marker de forkerte felter ved dubletter. Ikke dem der går igen.

Vedr. makroen: Du skal markere det område du ønsker checket inden du kører makroen. Den virker fint her hos mig.

Jeg markerede også både A og B, men den stod bare og kørte på disken og Excel låste helt.

Du skal kun markere en kolonne ad gangen .....

... eller rettere som jeg skriver "du skal markere ét område i én kolonne inden du kører makroen"

Så skriver den: Can's perform requested operation.

Det ser ud til det er hvis den ikke finder nogle... Tror rent faktisk det virker alligevel.

Hvor indsætter du koden?

Laver bare en ganske normal makro... Hvis den finder dubletter kommer der ingen fejl.

No-shit-> hvis du bruger min formel direkte i betinget formatering, skal du indtaste den i A2 og derefter kopiere formatet nedad :-)
Og jo... den virker skam fint.