Wie finde und ersetze ich Werte, die größer oder kleiner als ein bestimmter Wert in Excel sind?
Möglicherweise enthält Ihr Arbeitsblatt mehrere Daten. Jetzt möchten Sie alle Zellen suchen, die einen Wert enthalten, der größer oder kleiner als eine bestimmte Zahl ist, und diese dann durch einen anderen Wert ersetzen, den Sie sofort benötigen. Die normale Funktion zum Suchen und Ersetzen wird nicht angewendet, um dieses Problem zu lösen. Haben Sie weitere gute Vorschläge für diese Aufgabe?
Suchen und ersetzen Sie Werte, die größer oder kleiner als ein bestimmter Wert sind, durch VBA-Code
Suchen und ersetzen Sie Werte, die größer oder kleiner als ein bestimmter Wert sind, mit Kutools for Excel
Suchen und ersetzen Sie Werte, die größer oder kleiner als ein bestimmter Wert sind, durch VBA-Code
Zum Beispiel werde ich alle Werte finden, die größer als 500 sind, und sie durch 0 ersetzen.
Der folgende VBA-Code kann Ihnen dabei helfen, die Werte zu ersetzen, die größer oder kleiner als ein bestimmter Wert sind. Gehen Sie dazu wie folgt vor:
1. Halten Sie die Taste gedrückt ALT + F11 Tasten, und es öffnet die Microsoft Visual Basic für Applikationen Fenster.
2. Klicken Sie Insert > Modulund fügen Sie den folgenden Code in das Feld ein Modul Fenster.
VBA-Code: Suchen und Ersetzen von Werten, die größer oder kleiner als ein bestimmter Wert sind
Sub FindReplace()
'Updateby Extendoffice
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each Rng In WorkRng
If Rng.Value > 500 Then
Rng.Value = 0
End If
Next
End Sub
3. Dann drücken F5 Geben Sie im Eingabeaufforderungsfeld die Taste ein, um diesen Code auszuführen, und wählen Sie die zu ersetzenden Bereichsdaten aus (siehe Abbildung):
4. Und dann klick OKund Sie können sehen, dass alle Werte größer als 500 durch 0 ersetzt wurden.
Note: Im obigen Code können Sie die folgenden Variablen nach Ihren Wünschen ändern.
- Wenn Rng.Value > 500 Dann
- Rng.Wert = 0
Suchen und ersetzen Sie Werte, die größer oder kleiner als ein bestimmter Wert sind, mit Kutools for Excel
Wenn Sie mit dem Code nicht vertraut sind, kann ich über ein praktisches Tool sprechen. Kutools for ExcelMit seinen Wählen Sie Bestimmte Zellen aus Mit dieser Funktion können Sie schnell die Zellen auswählen, die Sie benötigen, und sie dann sofort ersetzen.
| Kutools for Excel : Mit mehr als 300 praktischen Excel-Add-Ins können Sie diese innerhalb von 30 Tagen ohne Einschränkung testen. |
Nach der Installation Kutools for ExcelGehen Sie wie folgt vor:
1. Wählen Sie den Datenbereich aus, den Sie suchen und ersetzen möchten.
2. Klicken Sie Kutoolen > Auswählen > Wählen Sie Bestimmte Zellen aus, siehe Screenshot:
3. In dem Wählen Sie Bestimmte Zellen aus Dialogfeld, klicken Sie auf Zelle Option unter Auswahltyp, und wähle Größer als von dem Spezifischer Typ Dropdown und geben Sie den Wert, den Sie verwenden möchten, in das Textfeld ein Größer als, siehe Screenshot:
4. Dann klick OK Klicken Sie auf die Schaltfläche, alle Zellen größer als 500 wurden sofort ausgewählt. Geben Sie dann den Wert ein, durch den Sie ersetzen möchten, und drücken Sie Strg + Eingabetaste Tasten zusammen, alle ausgewählten Werte wurden gleichzeitig ersetzt. Siehe Screenshots:
 |
 |
 |
Note: In dem Wählen Sie Bestimmte Zellen aus Im Dialogfeld können Sie andere Kriterien verwenden, z Weniger als, Equals, Enthält, Und so weiter.
Kutools für Excel jetzt herunterladen und kostenlos testen!
Demo: Suchen und ersetzen Sie Werte, die größer oder kleiner als ein bestimmter Wert sind, mit Kutools for Excel
In Verbindung stehende Artikel:
Wie finde und ersetze ich exakte Übereinstimmungen in Excel?
Wie ersetze ich Text durch entsprechende Bilder in Excel?
Wie finde und ersetze ich Füllfarben in Excel?
Beste Office-Produktivitätstools
Verbessern Sie Ihre Excel-Kenntnisse mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor. Kutools für Excel bietet über 300 erweiterte Funktionen, um die Produktivität zu steigern und Zeit zu sparen. Klicken Sie hier, um die Funktion zu erhalten, die Sie am meisten benötigen ...
Office Tab Bringt die 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!
