Wert suchen und Zelle ausgeben

Forumthread: Wert suchen und Zelle ausgeben

20.10.2012 19:29:35

Jonas

Hallo Leute,
leider hab ich es VBA-technisch mal so gar nicht drauf und weiß daher noch nicht wie ich das folgende Vorhaben realisieren kann/soll. Bei google habe ich einige Schnippsel gefunden, kann aber mit den einzelnen Teilen nicht viel anfangen... :-/
Mein Vorhaben:
Ich habe eine Tabelle mit Messdaten von Bauteilen und den verschiedenen Prüfmerkmalen. Einige Werte wurde nicht richtig gemessen, die Zellen dieser fehlerhaften Werte enthalten "?".
Nun möchte ich einen Bericht per Makro erstellen. Dabei soll unter anderem dieser fehlerhafte Messwert gesucht werden (die Zelle mit ?). Wenn die Tabelle einen solchen Wert enthält soll die Bauteibezeichnung und das entsprechende Prüfmerkmal ausgegeben werden. Die Prüfmerkmale befinden sich dabei in Spalte A, die Bauteilnamen in Zeile 1.
Ich versuche mal weiter mein Glück, freue mich aber definitiv über Anregungen von euch :)
Viele Grüße
Jonas

3
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Wert suchen und Zelle ausgeben

20.10.2012 20:54:55

Matze,Matthias
AW: Wert suchen und Zelle ausgeben

20.10.2012 21:34:06

Jonas
AW: Wert suchen und Zelle ausgeben

20.10.2012 23:01:08

Matze,Matthias

AW: Wert suchen und Zelle ausgeben

20.10.2012 20:54:55

Matze,Matthias

Hallo Jonas,
für so etwas ist eine Musterdatei das Sinnvollste, damit wir sehen wo welche Daten stehen.
Diese kannst du hier ins Forum stellen.
Gruß Matze
Ps.:sieht auch Formeltechnisch machbar aus - ohne VBA

AW: Wert suchen und Zelle ausgeben

20.10.2012 21:34:06

Jonas

Moin Matze,
danke für die schnelle Antwort. Ich habe schon einigen anderen VBA-Code für das Projekt geschrieben (die Daten sollen durch das VBA-Skript ausgewertet werden).
Die Tabelle habe ich mit fiktiven Daten gefüllt - die Originalwerte darf ich nicht rausgeben. Es gibt unterschiedliche Tabellen, bei denen die Anzahl der Prüfmerkmale und die Anzahl der Bauteile variiert (das Sprikt muss also immer die Anzahl der Zeilen/Spalten abfragen, damit es "flexibel" auf die jeweilige Situation reagierrt).
Hier die Testdatei (alle Werte sind Zufallszahlen)
https://www.herber.de/bbs/user/82228.xlsx
Vielen vielen Dank schonmal für alles!
Gruß
Jonas

AW: Wert suchen und Zelle ausgeben

20.10.2012 23:01:08

Matze,Matthias

Hallo Jonas,
so ich als VBA Laie hoffe das ich das so gut gemacht habe.
- Du bekommst eine Abfrage nach dem Suchkreterium.
- Die Ergebnisse werden im Sheet Suchergebnisse angezeigt.
- die gefundenen Zellen werden farblich hinterlegt.
- Ein Clear-button setzt alles zurück.
- Boej ,..viel spaß
https://www.herber.de/bbs/user/82230.xlsm
Gruß Matze

Infobox / Tutorial

Schritt-für-Schritt-Anleitung

Um in Excel einen Wert in einer Spalte zu suchen und die entsprechende Zelle auszugeben, kannst du sowohl mit Formeln als auch mit VBA arbeiten. Hier ist eine einfache Schritt-für-Schritt-Anleitung für beide Methoden:

Mit Formeln:

Öffne deine Excel-Tabelle und identifiziere die Spalte, in der du den Wert suchen möchtest.
Verwende die Funktion VERGLEICH, um den gesuchten Wert zu finden:
```
=VERGLEICH("Suchwert", A:A, 0)
```
Diese Formel gibt die Zeilennummer zurück, in der der Wert gefunden wird.
Verwende die Funktion INDEX, um den Wert aus einer anderen Spalte zurückzugeben:
```
=INDEX(B:B, VERGLEICH("Suchwert", A:A, 0))
```
Diese Formel gibt den Wert in der gleichen Zeile aus Spalte B zurück, wo der "Suchwert" in Spalte A gefunden wurde.

Mit VBA:

Öffne den VBA-Editor (ALT + F11) und erstelle ein neues Modul.

Füge folgenden Code ein:

Sub WertSuchen()
   Dim Suchwert As String
   Dim Zelle As Range

   Suchwert = InputBox("Geben Sie den Suchwert ein:")
   Set Zelle = Columns("A").Find(Suchwert, LookIn:=xlValues)

   If Not Zelle Is Nothing Then
       MsgBox "Wert gefunden in Zelle: " & Zelle.Address
   Else
       MsgBox "Wert nicht gefunden."
   End If
End Sub

Führe das Makro aus, um den Wert zu suchen und die Zelle auszugeben.

Häufige Fehler und Lösungen

Fehler: Der gesuchte Wert wird nicht gefunden.
- Lösung: Überprüfe, ob der Wert exakt übereinstimmt. Excel ist case-sensitive, wenn du die Suche in VBA anpasst.
Fehler: Die Formel gibt einen Fehler aus.
- Lösung: Stelle sicher, dass die Referenzen auf die richtigen Spalten und Zeilen verweisen und die Daten korrekt formatiert sind.

Alternative Methoden

Neben den oben beschriebenen Methoden gibt es weitere Ansätze, um Werte in Excel zu suchen:

SVERWEIS: Diese Funktion eignet sich hervorragend, um einen Wert in der ersten Spalte einer Tabelle zu suchen und einen Wert in der gleichen Zeile einer anderen Spalte zurückzugeben:
```
=SVERWEIS("Suchwert", A:B, 2, FALSCH)
```
XVERWEIS (in neueren Excel-Versionen): Diese Funktion ist flexibler und einfacher zu verwenden:
```
=XVERWEIS("Suchwert", A:A, B:B)
```

Praktische Beispiele

Größten Wert suchen und Zelle daneben ausgeben: Wenn du den größten Wert in einer Spalte finden und den Wert in der danebenstehenden Zelle ausgeben möchtest, kannst du dies mit einer Kombination aus MAX und VERGLEICH tun:
```
=INDEX(B:B, VERGLEICH(MAX(A:A), A:A, 0))
```
Fehlerhafte Messwerte suchen: Um in einer Tabelle nach Zellen zu suchen, die den Wert "?" enthalten, kannst du eine einfache WENN-Formel verwenden:
```
=WENN(A1="?", "Fehler gefunden in " & ZELLE("adresse", A1), "")
```

Tipps für Profis

VBA optimieren: Wenn du mit großen Datenmengen arbeitest, kann es hilfreich sein, die Application.ScreenUpdating = False und Application.Calculation = xlCalculationManual zu verwenden, um die Leistung zu verbessern.
Datenvalidierung nutzen: Setze Datenvalidierung ein, um sicherzustellen, dass nur gültige Werte in die Tabelle eingegeben werden, was die Suche erleichtert.
Benutzerdefinierte Funktionen: Erstelle benutzerdefinierte Funktionen in VBA, um spezifische Suchanfragen zu automatisieren und die Wartbarkeit deines Codes zu erhöhen.

FAQ: Häufige Fragen

1. Wie kann ich in einer Matrix nach einem Wert suchen? Du kannst die INDEX- und VERGLEICH-Funktionen in Kombination verwenden, um in einer Matrix nach einem Wert zu suchen und die Zelle auszugeben, in der der Wert steht.

2. Was ist der Unterschied zwischen SVERWEIS und XVERWEIS? SVERWEIS ist auf die Suche in der ersten Spalte einer Tabelle beschränkt, während XVERWEIS flexibler ist und auch in beliebigen Spalten suchen kann.

Beliebteste Forumthreads (12 Monate)

Forumthread: Wert suchen und Zelle ausgeben

3 Beiträge zum Forumthread Beiträge zu diesem Forumthread

Forumthreads zu verwandten Themen

VBA Beispiele zu diesem und ähnlichen Themen

Infobox / Tutorial

Wert suchen und Zelle ausgeben in Excel

Schritt-für-Schritt-Anleitung

Häufige Fehler und Lösungen

Alternative Methoden

Praktische Beispiele

Tipps für Profis

FAQ: Häufige Fragen

Beliebteste Forumthreads (12 Monate)

3
Beiträge zum Forumthread

Beiträge zu diesem Forumthread