723328

Nachnamen ermitteln

Anforderung

Zeitaufwand

Problem: Sie müssen aus einer Namensliste die Nachnamen herauslösen. Dabei steht jeweils der komplette Name in einer Zelle. Erschwerend kommt hinzu, daß die Vornamen auch aus mehreren Bestandteilen bestehen können und zusätzlich Titel verzeichnet sind. Die Namen stehen allerdings in einer festen Ordnung in der Zelle.

Lösung: Sie können mit Hilfe einer benutzerdefinierten Funktion die Nachnamen aus einer beliebigen Zeichenkette extrahieren. Diese Funktion basiert in unserem Beispiel oben darauf, daß der Nachname immer nach dem letzten Leerzeichen folgt. Zur Vorbereitung kehrt die Funktion die gesamte Zeichenkette um. Danach ermittelt das Programm die Position des ersten Leerzeichens in der umgekehrten Zeichenkette und schneidet den Teil des Namens ab, der an dieser Position beginnt.Erstellen Sie also über "Einfügen, Makro, Visual Basic-Modul" ein neues Modul-Blatt, und geben Sie den Text aus der Abbildung ein. Die Funktion "Nachname" können Sie in Zukunft wie jede vordefinierte Funktion verwenden. Geben Sie also beispielsweise "=Nachname(A1)" ein, so wird der Nachname aus dem Inhalt der Zelle A1 ermittelt.

0 Kommentare zu diesem Artikel
723328