Suchen und markieren Sie Suchergebnisse in Excel

In Excel können Sie die Funktion Suchen und Ersetzen verwenden, um einen bestimmten Wert zu finden. Wissen Sie jedoch, wie Sie die Suchergebnisse nach der Suche hervorheben können? In diesem Artikel stelle ich zwei verschiedene Möglichkeiten vor, mit denen Sie Suchergebnisse in Excel suchen und hervorheben können.

Suchen und markieren Sie Suchergebnisse anhand des VBA-Codes

Suchen und markieren Sie Suchergebnisse mithilfe der bedingten Formatierung

Suchen und markieren Sie Suchergebnisse mit einem praktischen Tool

In Excel gibt es einen VBA-Code, mit dem Sie einen Wert suchen und dann die Suchergebnisse hervorheben können.

1. Aktivieren Sie das Blatt, das Sie suchen möchten, und markieren Sie die Ergebnisse. Drücken Sie Alt + F11 Schlüssel zum Öffnen Microsoft Visual Basic für Applikationen Fenster.

2 Klicken Insert > Modulund fügen Sie den folgenden Code in das neue Modul ein.

VBA: Markieren Sie die Suchergebnisse

Sub FindRange()
'UpdatebyExtendoffice20190813
Dim xRg As Range
Dim xFRg As Range
Dim xStrAddress As String
Dim xVrt As Variant
xVrt = Application.InputBox(prompt:="Search:", Title:="www.extendoffice.com")
If xVrt <> "" Then
Set xFRg = ActiveSheet.Cells.Find(what:=xVrt)
If xFRg Is Nothing Then
MsgBox prompt:="Cannot find this value", Title:="www.extendoffice.com"
Exit Sub
End If
xStrAddress = xFRg.Address
Set xRg = xFRg
Do
Set xFRg = ActiveSheet.Cells.FindNext(After:=xFRg)
Set xRg = Application.Union(xRg, xFRg)
Loop Until xFRg.Address = xStrAddress
If xRg.Count > 0 Then
xRg.Interior.ColorIndex = 8
xRsp = MsgBox(prompt:="Do you want to cancel highlighting?", Title:="www.extendoffice.com", Buttons:=vbQuestion + vbOKCancel)

If xRsp = vbOK Then xRg.Interior.ColorIndex = xlNone
End If
End If
End Sub

3. Drücken Sie F5 Wenn Sie die Taste drücken, wird ein Suchfeld angezeigt, in dem Sie den angegebenen Wert eingeben können, den Sie suchen.

4 Klicken OKwurden die übereinstimmenden Ergebnisse mit einer Hintergrundfarbe hervorgehoben. Außerdem wird ein Dialogfeld angezeigt, in dem Sie gefragt werden, ob Sie die Hervorhebung abbrechen möchten. Klicken OK Klicken Sie auf, um die Hervorhebung abzubrechen und den Dialog zu schließen Abbrechen um die Hervorhebung beizubehalten und den Dialog zu schließen.

Hinweis:

1. Wenn kein übereinstimmender Wert gefunden wird, wird ein Dialogfeld angezeigt, das Sie daran erinnert.

2. Dieser VBA funktioniert für das gesamte aktive Blatt und ohne Berücksichtigung der Groß- und Kleinschreibung.

Möchten Sie eine Gehaltserhöhung und viel Zeit haben, um mit der Familie zusammen zu sein? Mit der Registerkarte "Office" können Sie Ihre Effizienz in Microsoft Office um 50% steigern Es ist unglaublich, dass die Arbeit an zwei oder mehr Dokumenten einfacher und schneller ist als die Arbeit an einem. Im Vergleich zu bekannten Browsern ist das Tool mit Registerkarten in Office Tab leistungsfähiger und effizienter. Reduzieren Sie jeden Tag Hunderte von Mausklicks und Tastatureingaben. Verabschieden Sie sich jetzt von der Maushand. Wenn Sie normalerweise an mehreren Dokumenten arbeiten, spart Office Tab viel Zeit. 30-tägige kostenlose Testversion, Keine Kreditkarte benötigt. WeiterlesenKostenloser Download jetzt

In Excel kann die Funktion "Bedingte Formatierung" auch die Suchergebnisse automatisch hervorheben.

Angenommen, die Daten und das Suchfeld werden wie im folgenden Screenshot angezeigt. Führen Sie nun die folgenden Schritte aus:

1. Wählen Sie den Bereich aus, in dem Sie suchen möchten, und klicken Sie auf Home > Bedingte Formatierung > Neue Regel.

2. In dem Neue Formatierungsregel Dialog auswählen Verwenden Sie eine Formel, um zu bestimmen, welche Zellen formatiert werden sollen der Wählen Sie einen Regeltyp Gehen Sie dann zum Textfeld unter Formatieren Sie Werte, bei denen diese Formel wahr ist, Typ = AND ($ E $ 2 <> "", $ E $ 2 = A4).

E2 ist die Zelle, in der Sie den Suchwert platzieren, und A4 ist die erste Zelle in dem Bereich, in dem Sie suchen.

3 Klicken Format Schaltfläche, gehen Sie zu Format Cells Dialog, unter Füllen Wählen Sie auf der Registerkarte eine Farbe nach Bedarf aus. Klicken OK > OK um die Dialoge zu schließen.

Wenn Sie von nun an das Schlüsselwort in Zelle E2 eingeben, werden die Suchergebnisse automatisch im angegebenen Bereich hervorgehoben.

Wenn Sie nach zwei oder mehr Werten suchen und die Suchergebnisse einmal hervorheben möchten, können Sie die Schlüsselwort markieren Merkmal von Kutools for Excel könnte dir einen Gefallen tun.

Kutools for Excel ist ein leistungsstarkes Add-In, das mehr als 300 praktische Tools zur Steigerung Ihrer Effizienz bei Excel-Jobs sammelt. Klicken Sie hier, um jetzt eine kostenlose 30-Tage-Testversion zu erhalten.

1. Wählen Sie den zu durchsuchenden Datenbereich aus, klicken Sie auf Kutoolen > Text > Schlüsselwort markieren.

2. Geben Sie im Popup-Dialogfeld die Werte ein, die Sie suchen möchten, und trennen Sie sie durch Kommas in Stichwort (Keyword) Textfeld. Dann wähle die Optionen markieren und die Schriftfarbe nach Bedarf. Klicken Ok.

Wenn Sie den Wert unter Beachtung der Groß-/Kleinschreibung suchen möchten, aktivieren Sie Groß-/Kleinschreibung Kontrollkästchen.

Dann werden die übereinstimmenden Ergebnisse mit einer anderen Schriftfarbe hervorgehoben.

Mit der Schlüsselwort markieren können Sie auch einen Teil der Zeichenfolge im Bereich finden. Angenommen, Suchzellen enthalten Ball oder Sprung, geben Sie Ball ein, springen Sie in die Stichwort (Keyword) Textfeld, legen Sie dann die Einstellungen fest und klicken Sie auf Ok.

Klicken Sie hier, um die Beispieldatei herunterzuladen

---

Die besten Tools für die Office-Produktivität

Kutools for Excel Löst die meisten Ihrer Probleme und steigert Ihre Produktivität um 80 %

• Super Formelriegel (leicht mehrere Textzeilen und Formeln bearbeiten); Layout lesen (leichtes Lesen und Bearbeiten einer großen Anzahl von Zellen); In gefilterten Bereich einfügen...
• Zellen / Zeilen / Spalten zusammenführen und Speichern von Daten; Inhalt geteilter Zellen; Kombinieren Sie doppelte Zeilen und Summe / Durchschnitt... doppelte Zellen verhindern; Bereiche vergleichen...
• Wählen Sie Duplizieren oder Eindeutig Reihen; Wählen Sie Leere Zeilen (alle Zellen sind leer); Super Find und Fuzzy Find in vielen Arbeitsmappen; Zufällige Auswahl ...
• Exakte Kopie Mehrere Zellen ohne Änderung der Formelreferenz; Referenzen automatisch erstellen zu mehreren Blättern; Aufzählungszeichen einfügen, Kontrollkästchen und mehr ...
• Lieblingsformeln und schnell einfügen, Bereiche, Diagramme und Bilder; Zellen verschlüsseln mit Passwort; Mailingliste erstellen und E-Mails senden ...
• Text extrahieren, Text hinzufügen, Nach Position entfernen, Leerzeichen entfernen;; Paging-Zwischensummen erstellen und drucken; Inhalt und Kommentare zwischen Zellen konvertieren...
• Superfilter (Speichern und Anwenden von Filterschemata auf andere Blätter); Erweiterte Sortierung nach Monat / Woche / Tag, Häufigkeit und mehr; Spezialfilter fett, kursiv ...
• Kombinieren Sie Arbeitsmappen und Arbeitsblätter;; Tabellen basierend auf Schlüsselspalten zusammenführen; Daten in mehrere Blätter aufteilen; Batch-Konvertierung von xls, xlsx und PDF...
• Pivot-Tabellengruppierung nach Wochennummer, Wochentag und mehr ... Entsperrte, gesperrte Zellen anzeigen durch verschiedene Farben; Markieren Sie Zellen mit Formel / Name...

Lesen Sie mehr... Vollständige Funktionen 30-tägige kostenlose Testversion ... Kauf... 

---

Office-Registerkarte - bringt eine Oberfläche mit Registerkarten in Office und erleichtert Ihnen die Arbeit erheblich

• Aktivieren Sie das Bearbeiten und Lesen von Registerkarten in Word, Excel und PowerPoint, Publisher, Access, Visio und Project.
• Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters und nicht in neuen Fenstern.
• Steigert Ihre Produktivität um 50 % und reduziert jeden Tag Hunderte von Mausklicks für Sie!

Lesen Sie mehr... Vollständige Funktionen 30-tägige kostenlose Testversion ... Kauf...