Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Intersect(Target, Range("A1:A10")) Is Nothing Then
Else
MsgBox "Zelle ist in gewähltem Zellbereich"
End If
End Sub
Sub test()
If WorksheetFunction.CountIf(Range("A1:A10"), ActiveCell.Value) > 0 Then
MsgBox "Wert ist enthalten"
End If
End Sub
Sub test()
If WorksheetFunction.CountIf(Sheets("Tabelle2").Range("A1:A10"), ActiveCell.Value) > 0 Then
MsgBox "Wert ist enthalten"
End If
End Sub
Um mit Excel zu prüfen, ob ein Wert in einem bestimmten Bereich liegt, kannst du VBA verwenden. Folge diesen Schritten:
Öffne Excel und drücke ALT + F11, um den Visual Basic for Applications (VBA) Editor zu öffnen.
Wähle das Tabellenblatt aus, in dem du den Code anwenden möchtest.
Füge den folgenden Code in das Modul ein:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Intersect(Target, Range("A1:A10")) Is Nothing Then
Else
MsgBox "Zelle ist in gewähltem Zellbereich"
End If
End SubSchließe den VBA-Editor und gehe zurück zu Excel.
Klicke auf eine Zelle im Bereich A1:A10, um die Meldung zu sehen.
Falls du überprüfen möchtest, ob der Wert der aktiven Zelle in einer Liste auf einem anderen Tabellenblatt vorhanden ist, verwende diesen Code:
Sub test()
If WorksheetFunction.CountIf(Sheets("Tabelle2").Range("A1:A10"), ActiveCell.Value) > 0 Then
MsgBox "Wert ist enthalten"
End If
End SubFehler: "Der eingegebene Code funktioniert nicht."
Worksheet_SelectionChange muss im Modul des spezifischen Tabellenblatts sein, nicht in einem allgemeinen Modul.Fehler: "Kein Ergebnis angezeigt."
Wenn du nicht mit VBA arbeiten möchtest, kannst du auch die Funktion WENN zusammen mit VERGLEICH verwenden:
=WENN(ISTFEHLER(VERGLEICH(A1;Tabelle2!A1:A10;0));"Wert nicht gefunden";"Wert gefunden")Diese Formel prüft, ob der Wert in Zelle A1 auf "Tabelle2" in dem Bereich A1:A10 vorhanden ist.
Prüfen eines Wertes in einem Bereich:
Überprüfung ohne VBA:
Data Validation in Excel, um sicherzustellen, dass nur gültige Werte in bestimmte Zellen eingegeben werden.IFERROR-Befehl, um Fehler bei der Verwendung von Formeln zu vermeiden.1. Wie kann ich den Bereich anpassen, den ich prüfen möchte?
Du kannst den Bereich in der Range-Funktion im VBA-Code ändern, z.B. Range("B1:B20").
2. Funktioniert das auch in Excel Online? VBA funktioniert nicht in Excel Online. Du müsstest alternative Methoden wie Formeln verwenden, um die Werte zu prüfen.
3. Was ist, wenn ich mehrere Zellen gleichzeitig prüfen möchte?
Du kannst eine Schleife in VBA verwenden, um mehrere Zellen zu überprüfen, oder die COUNTIF-Funktion in einer Formel anpassen, um einen Bereich zu erfassen.
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen