Zelle in einer Spalte von unten nach oben suchen
Schritt-für-Schritt-Anleitung
Um in einer Excel-Tabelle von unten nach oben zu suchen und den Wert einer Zelle zu kopieren, kannst Du den folgenden VBA-Code verwenden. Dieser Code sucht nach einer bestimmten Teilenummer und springt dann nach oben, bis er eine Zelle mit dem Wort "Ergebnis" findet.
- Öffne deine Excel-Datei und drücke
ALT + F11, um den VBA-Editor zu öffnen.
- Klicke im Menü auf
Einfügen und wähle Modul, um ein neues Modul zu erstellen.
- Füge den folgenden VBA-Code ein:
Sub SucheVonUntenNachOben()
Dim tnNummer As Long, bStep1 As Boolean, bStep2 As Boolean
Dim iZeile As Long
tnNummer = 35 ' Ändere dies auf die gewünschte Teilenummer
For iZeile = Cells(Rows.Count, 10).End(xlUp).Row To 7 Step -1
If bStep1 Then
If Cells(iZeile, 10) = "Ergebnis" Then
bStep2 = True
Exit For
End If
Else
If Cells(iZeile, 10) = tnNummer Then bStep1 = True
End If
Next iZeile
If bStep2 Then
Cells(iZeile, 9).Copy Range("A1") ' Wert wird nach A1 kopiert
Else
MsgBox "kein Ergebnis"
Exit Sub
End If
End Sub
- Schließe den VBA-Editor und gehe zurück zu deiner Excel-Tabelle.
- Drücke
ALT + F8, wähle SucheVonUntenNachOben aus und klicke auf Ausführen.
Häufige Fehler und Lösungen
Alternative Methoden
Wenn Du eine einfachere Methode ohne VBA bevorzugst, kannst Du auch die Funktion VERGLEICH und INDEX in Excel verwenden:
- Verwende die
VERGLEICH-Funktion, um die Position der Teilenummer zu finden.
- Nutze die
INDEX-Funktion, um den Wert der Zelle mit "Ergebnis" zu finden.
=INDEX(A:A;VERGLEICH("Ergebnis";B:B;0)-1)
Diese Formel setzt voraus, dass sich die Daten in den Spalten A und B befinden.
Praktische Beispiele
Angenommen, Du hast eine Excel-Tabelle mit den folgenden Werten in der Spalte J:
1
2
3
Ergebnis
4
5
35
Wenn Du den oben genannten VBA-Code ausführst, wird der Wert 4 in Zelle A1 kopiert, da er sich direkt links von der Zelle mit "Ergebnis" befindet.
Tipps für Profis
- Um Deine Excel-Tabelle von unten nach oben zu drehen, kannst Du die Funktion "Daten transponieren" verwenden. Markiere die Daten, kopiere sie, klicke mit der rechten Maustaste auf die Zielzelle und wähle
Inhalte einfügen → Transponieren.
- Wenn Du häufig mit VBA arbeitest, empfehle ich, eine eigene Bibliothek für nützliche Makros zu erstellen, um Zeit zu sparen.
FAQ: Häufige Fragen
1. Wie kann ich die Teilenummer dynamisch anpassen?
Du kannst eine Zelle in der Tabelle auswählen, die die Teilenummer enthält, und den Code anpassen, um diesen Wert zu verwenden.
2. Funktioniert dieser Code auch in Excel 365?
Ja, der bereitgestellte VBA-Code funktioniert in allen aktuellen Excel-Versionen, einschließlich Excel 365.