31 Mai 2021

Excel - Per VBA-Code ermitteln, ob eine Zelle ein bestimmtes Zeichen enthält

Jede/r Makro-Programmierer*in/Entwickler*in muss irgendwann feststellen, ob ein bestimmtes Zeichen (gerne auch mal mehrere) im Inhalt einer Zelle enthalten sind. Allerdings wäre es ja einfach, wenn die Zeichen alleine stünden.

Was ist aber, wenn das Zeichen Bestandteil des Inhalts ist. Beispiel:

Am 31.5.2021 kommt eine Ware zurück. Die Gründe für die Rücksendung können sein:
A - Falsche Qualität
B - Falsche Farbe
C - Falscher Aktikel
D - passt nicht
E - Änderungsbestellung
F - Garantiefall

Wäre die Tabelle so aufgebaut, dass es für jeden Vorfall eine Spalte gäbe und im Bedarfsfall ein "X" gesetzt würde, wäre es einfach.

Aber es gibt nur eine Spalte für alle Buchstaben und die Kunden können mehrere Gründe für die Rückgabe angeben 💥

In unserem Beispiel wurden diese Gründe angegeben:
ABD

So ermittel ich , welche Artikel wegen falsche Farbe zurückgegeben wurden.

*****

        If ActiveCell.Value Like "*B*" Then         '(was immer dann getan werden soll)
            Else     ' (was passiert alternativ?)
        End If

 ****

Entscheidend ist der Befehl "Like" statt "=" und die 'doppelten' Sterne, die das 'B' einschließen. Erst der zweite Stern bewirkt, dass es egal ist, an welcher Stelle das B gefunden wird.

 

Danke an die Kollegen*innen von http://www.office-loesung.de. in deren Plattform ich den entscheidenden Hinweis fand.

Keine Kommentare: