Einen Wert in Zellen suchen, die ebenfalls mehrere Werte enthalten

[Micha1908]

Hallo zusammen,

folgendes Problem:

Ich möchte gerne einen Wert in einer kompletten Spalte suchen lassen. Jedoch sind in dieser Spalte auch Zellen mit mehreren Werten vorhanden. Diese Spalte darf jedoch auch nicht verändert werden

            Spalte A                          Spalte Z
Zelle 1   61970, 61972                   21412
Zelle 2   21412, 61981, 61975         61972

Wie suche ich nun z.b. den Wert 21412 in der kompletten Spalte A und gebe diesen wieder?

Vielen Dank vorab.

Mit freundlichen Grüßen

Micha

[Officer]

Hallo Micha,

das lässt sich relativ einfach per VBA realisieren.

Der folgende VBA-Code liest den Suchbegriff aus Zelle G2 aus und sucht diesen anschließend in Spalte A. Bei einem Treffer wird der Suchbegriff daneben in Spalte B geschrieben.

Code: Visual Basic

1. Sub Teilstring_auslesen()
2.  
3. '** Suchstring festlegen
4. strSuchstring = ActiveSheet.Range("G2").Value
5.  
6. For a = 1 To ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row
7.  
8.   pos1 = InStr(1, ActiveSheet.Cells(a, 1).Value, strSuchstring, 1)
9.   If pos1 > 0 Then
10.     ActiveSheet.Cells(a, 2).Value = strSuchstring
11.   End If
12.  
13. Next a
14.  
15. End Sub
16.  

In der beigefügten Datei, kannst Du das Makro ebenfalls noch mal nachvollziehen.

Gruß

Officer

[Micha1908]

Vielen Dank erstmal.
Gibt es mit dem normalen Excel keine Möglichkeit?

[Officer]

Hi Micha,

mit der folgenden Formel, sollte es auch ohne VBA funktionieren:

=WENN(ISTFEHLER(TEIL(A1;SUCHEN($G$2;A1);5));"";TEIL(A1;SUCHEN($G$2;A1);5))

In diesem Beispiel befindet sich der Suchbegriff, also der Werte nach dem gesucht werden soll in Zelle G2 und der Text in dem gesucht werden soll ab Zelle A1, siehe auch Beispieldatei.

Gruß

Officer