Excel-Blatt entsperren (Ein einfacher Leitfaden)

Schritt-für-Schritt-Anleitung

Warum diese Methode verwenden?

Sie ist nicht destruktiv. Sie können die Duplikate sehen, untersuchen, warum sie dort sind, und manuell entscheiden, ob Sie sie behalten oder löschen möchten.

Wie man es benutzt

1. Klicken Sie irgendwo in Ihrer Datentabelle.

2. Gehen Sie zur Daten Registerkarte im Menüband.

3. Klicken Sie in der Daten-Tools-Gruppe auf Duplikate entfernen.

4. Spalten auswählen: Es erscheint ein Fenster, in dem Sie fragen, welche Spalten überprüft werden sollen.

• Wenn Sie beispielsweise wiederholte E-Mails löschen möchten, würden Sie nur "E-Mail" auswählen, Excel löscht jede Zeile, in der die E-Mail wiederholt wird.

• Wenn Sie alle Spalten auswählen, löscht Excel nur eine Zeile, wenn jede einzelne Zelle in dieser Zeile mit einer anderen Zeile übereinstimmt.

  5. Klicken Sie auf OK. Excel wird Ihnen mitteilen, wie viele doppelte Werte gefunden und entfernt wurden. Es wird Ihnen auch mitteilen, wie viele eindeutige Werte übrig bleiben.

Profi-Tipp: Kopieren Sie Ihre Daten immer auf ein neues Blatt, bevor Sie dieses Tool verwenden. Sobald die Duplikate entfernt sind und die Datei gespeichert ist, können Sie sie nicht einfach "wiederherstellen", wenn Sie später feststellen, dass einige legitime Einträge waren.

Logik

Die COUNTIF-Funktion zählt, wie oft ein bestimmter Wert in einem Bereich vorkommt. Wenn diese Anzahl größer als 1 ist, haben Sie ein Duplikat.

Implementierung

=COUNTIF(B:B, B2)

=COUNTIF(B:B, B2)

This appears to be an Excel formula rather than C# code. If you have C# code that interacts with Excel or a specific C# snippet you'd like converted, please provide that code for conversion to VB.NET.

Erweiterte Formel: Hervorhebung nur des zweiten Vorkommens

Wenn Sie das erste Auftreten eines Namens beibehalten, aber alle darauf folgenden Male hervorheben möchten, verwenden Sie eine "erweiterbare Bereich"-Formel:

=COUNTIF($A$2:A2, A2) > 1

=COUNTIF($A$2:A2, A2) > 1

Indem der erste Teil des Bereichs ($A$2) gesperrt bleibt, der zweite Teil jedoch relativ bleibt (A2), überprüft die Formel "vom Anfang bis zu meiner aktuellen Zeile". Dies ist der beste Weg, um Duplikate zur Löschung zu markieren, während die originalen Daten unberührt bleiben.

DerPower QueryArbeitsablauf

1. Wählen Sie Ihre Daten aus und gehen Sie zum Daten-Tab.

2. Klicken Sie auf Aus Tabelle/Bereich (dies wird Ihre Daten in eine offizielle Excel-Tabelle umwandeln).

3. Sobald derPower QueryEditor geöffnet wird, klicken Sie mit der rechten Maustaste auf den Spaltenkopf, den Sie überprüfen möchten.

4. Wählen Sie Duplikate beibehalten (um nur die Fehler anzuzeigen) oder Duplikate entfernen (um die Liste zu bereinigen).

5. Klicken Sie auf Schließen & Laden, um die bereinigten Daten in ein neues Excel-Blatt zu übertragen.

Der Makro-Code

Um dies zu verwenden, drücken Sie Alt + F11, gehen Sie zu Einfügen > Modul und fügen Sie ein:

Sub HighlightAllDuplicates()
    Dim myRange As Range
    Set myRange = Selection
    myRange.FormatConditions.AddUniqueValues
    myRange.FormatConditions(myRange.FormatConditions.Count).SetFirstPriority
    myRange.FormatConditions(1).DupeUnique = xlDuplicate
    With myRange.FormatConditions(1).Interior
        .Color = RGB(255, 199, 206) ' Light Red
    End With
End Sub

Sub HighlightAllDuplicates()
    Dim myRange As Range
    Set myRange = Selection
    myRange.FormatConditions.AddUniqueValues
    myRange.FormatConditions(myRange.FormatConditions.Count).SetFirstPriority
    myRange.FormatConditions(1).DupeUnique = xlDuplicate
    With myRange.FormatConditions(1).Interior
        .Color = RGB(255, 199, 206) ' Light Red
    End With
End Sub

Option Strict On



Sub HighlightAllDuplicates()
    Dim myRange As Range
    myRange = Selection
    myRange.FormatConditions.AddUniqueValues()
    myRange.FormatConditions(myRange.FormatConditions.Count).SetFirstPriority()
    myRange.FormatConditions(1).DupeUnique = xlDuplicate
    With myRange.FormatConditions(1).Interior
        .Color = RGB(255, 199, 206) ' Light Red
    End With
End Sub

Jetzt können Sie einfach einen Bereich auswählen und dieses Makro ausführen, um das rote Highlight sofort anzuwenden.

1. Unsichtbare Leerzeichen

Excel sieht "Apple" und "Apple " (mit einem Leerzeichen am Ende) als völlig unterschiedliche Dinge.

• Beseitigung: Verwenden Sie die Funktion =TRIM(A2) in einer Hilfsspalte, um alle führenden und nachstehenden Leerzeichen zu entfernen, bevor Sie Ihre Duplikatprüfung durchführen.

2. Zahlen als Text gespeichert

Wenn eine Zelle die Zahl 123 enthält und eine andere den Text '123, wird Excel sie nicht als Duplikate markieren.

• Beseitigung: Wählen Sie die Spalte aus, gehen Sie zu Daten > Text in Spalten und klicken Sie auf Fertigstellen. Dadurch wird alles in dieser Spalte in ein einheitliches Format umgewandelt.

3. Geschützte Leerzeichen

Von Websites kopierte Daten enthalten oft ein "geschütztes Leerzeichen" (ASCII 160), das die TRIM-Funktion nicht entfernen kann.

• Beseitigung: Verwenden Sie Suchen und Ersetzen (Strg + H). Halten Sie im "Suchen"-Feld Alt gedrückt und geben Sie 0160 auf dem Nummernblock ein. Lassen Sie das "Ersetzen"-Feld leer und klicken Sie auf Alle ersetzen.

Warum IronXL verwenden?

• Kein Interop: Vermeiden Sie die Kopfschmerzen von Microsoft.Office.Interop.
• Daten mit Leichtigkeit manipulieren: Öffnen und bearbeiten Sie Excel-Arbeitsblätter innerhalb Ihrer Projekte ganz einfach, egal ob Sie nur Duplikatzellen finden und hervorheben müssen, ganze Zeilen bearbeiten, Formatierungsstile anwenden, eindeutige Werte extrahieren oder einfach neue Daten eingeben.
• Geschwindigkeit: Verarbeiten Sie riesige Tabellenkalkulationen in Millisekunden.
• C#-Integration: Verwenden Sie vertraute LINQ-Syntax, um Duplikate zu finden und zu gruppieren, selbst wenn Sie Duplikatreihen auf Grundlage mehrerer Kriterien hervorheben müssen.

Code Snippet: Finding Duplicate Entries in C

using IronXL;
using System.Linq;
// Load the workbook
WorkBook workbook = WorkBook.Load("financial_report.xlsx");
WorkSheet sheet = workbook.DefaultWorkSheet;
// Select the column to audit (e.g., Column B - Revenue)
var range = sheet["B2:B20"];
// Use LINQ to find the duplicate values
var duplicateList = range.GroupBy(c => c.Value.ToString())
                         .Where(g => g.Count() > 1)
                         .Select(g => g.Key);
// Apply styling to those duplicates
foreach (var cell in range)
{
    if (duplicateList.Contains(cell.Value.ToString()))
    {
        cell.Style.BackgroundColor = "#FFC7CE"; // Light Red fill
        cell.Style.Font.Color = "#9C0006";       // Dark Red text
    }
}
// Save the audited file
workbook.SaveAs("Audited_financial_report.xlsx");

using IronXL;
using System.Linq;
// Load the workbook
WorkBook workbook = WorkBook.Load("financial_report.xlsx");
WorkSheet sheet = workbook.DefaultWorkSheet;
// Select the column to audit (e.g., Column B - Revenue)
var range = sheet["B2:B20"];
// Use LINQ to find the duplicate values
var duplicateList = range.GroupBy(c => c.Value.ToString())
                         .Where(g => g.Count() > 1)
                         .Select(g => g.Key);
// Apply styling to those duplicates
foreach (var cell in range)
{
    if (duplicateList.Contains(cell.Value.ToString()))
    {
        cell.Style.BackgroundColor = "#FFC7CE"; // Light Red fill
        cell.Style.Font.Color = "#9C0006";       // Dark Red text
    }
}
// Save the audited file
workbook.SaveAs("Audited_financial_report.xlsx");

Imports IronXL
Imports System.Linq

' Load the workbook
Dim workbook As WorkBook = WorkBook.Load("financial_report.xlsx")
Dim sheet As WorkSheet = workbook.DefaultWorkSheet

' Select the column to audit (e.g., Column B - Revenue)
Dim range = sheet("B2:B20")

' Use LINQ to find the duplicate values
Dim duplicateList = range.GroupBy(Function(c) c.Value.ToString()) _
                         .Where(Function(g) g.Count() > 1) _
                         .Select(Function(g) g.Key)

' Apply styling to those duplicates
For Each cell In range
    If duplicateList.Contains(cell.Value.ToString()) Then
        cell.Style.BackgroundColor = "#FFC7CE" ' Light Red fill
        cell.Style.Font.Color = "#9C0006"       ' Dark Red text
    End If
Next

' Save the audited file
workbook.SaveAs("Audited_financial_report.xlsx")

Vergleich der Methoden

| Methode | Am besten für|Schwierigkeit| | ---| ---| ---| |Bedingte Formatierung|Schnelle visuelle Prüfungen kleiner/mittlerer Listen. |Anfänger| |Duplikate entfernen|Dauerhafte Bereinigung der Daten. |Anfänger| |COUNTIF-Formel|Hinzufügen von Logik zu Ihrem Blatt (z.B. "wenn Anzahl > 3"). |Mittelstufe| |Power Query|Sehr große Datensätze oder wiederkehrende Datenimporte. | Fortgeschrittene| | IronXL (.NET) |App-Erstellung oder automatisierte serverseitige Berichte. |Entwickler|