Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 21:40:53
Excel Datenquelle aus dem Web mit Anmeldung?
25.04.2024 21:21:16
Zellkommentar in UserForm anzeigen und bearbeiten
25.04.2024 21:13:13
Kalenderwochen addieren
25.04.2024 21:06:05
Duplikate entfernen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1840to1844
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1840to1844
1840to1844
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Vorname und Nachname Trennung

Vorname und Nachname Trennung
16.08.2021 11:48:25
Azat
Guten Tag,
ich möchte gerne den Vornamen sowie den Nachnamen aus der Spalte rauskriegen und jeweils in zwei Spalten unterteilen.
Ich komme selbst mit der =TEIL() Funktion nicht ganz weiter.
Hat jemand eine Idee wie ich hier vorgehen kann.
Zudem möchte ich in einer weiteren Spalte, wenn es sich um Frau handelt die 01 haben und bei einem Herrn die 02. Klappt dies mit der =Finden() Funktion?
Beispiel:
Vorher:
Spalte A
Herr Max Mustermann
Frau Anja Kramm
Herr Schoot
z. Hd. Herr Nils Zufall
Nacher:
Spalte A(Vorname) SpalteB(Nachname) SPalteCAnrede
Max Mustermann 02
Anja Kramm 01
"" Schoot 02
Nils Zufall 02
Vielen Dank für jegliche Unterstützung.

16
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
ne Bsp-Datei per Upload wäre schön...owT
16.08.2021 11:51:15
Oberschlumpf
AW: Vorname und Nachname Trennung
16.08.2021 12:56:44
GerdL
Moin

Sub Unit()
Dim Z As Variant, X As Variant, Txt As String
For Each Z In Range("A1:A4")
X = Split(Z)
Txt = vbNullString
If InStr(Z, "Herr") Then
Txt = "'02"
ElseIf InStr(Z, "Frau") Then
Txt = "'01"
End If
Txt = X(UBound(X)) & "|" & Txt
If X(UBound(X) - 1) = "Herr" Or X(UBound(X) - 1) = "Frau" Then
X(UBound(X) - 1) = ""
End If
Txt = X(UBound(X) - 1) & "|" & Txt
Z.Offset(0, 5).Resize(1, 3) = Split(Txt, "|")
Next
End Sub
Gruß Gerd
AW: ja, es geht mit FINDEN() ...
16.08.2021 13:07:43
neopa
Hallo Azat,
... für die Anredespalte z.B. mit folgender Formel: =WENNFEHLER(VERWEIS(9;1/FINDEN({"Frau"."Herr"};A1)^0;{"01";"02"});"")
und diese nach unten kopieren.

Namen und Vornamen sind evtl. auch einfacher mit einer Formel zu ermitteln, wenn wie in Deinem Beispiel keine doppelte Vornamen und Nachnamen vorkommen.
Solltest Du jedoch auf die bereits verlinkte Formel zugreifen wollen, müsstest Du ergänzend noch "Frau" und "Herr" sowie "z. Hd" mittels WECHSELN() durch "" ersetzen.
Gruß Werner
.. , - ...
Anzeige
Frau Traudl Herrhausen
16.08.2021 13:40:00
WF
und, warum so kompliziert ?
=(LINKS(A1;4)="Frau")*1+(LINKS(A1;4)="Herr")*2
Format "0"1;;
WF
natürlich Format 00;;
16.08.2021 13:50:51
WF
.
AW: u.a. wegen z.B. "z. Hd Frsu Müller" ...
16.08.2021 13:53:48
neopa
Hallo WF,
... denn da würde Dein Vorschlag so nicht ausreichen. Hab FINDEN() auch eingesetzt, weil er nach FINDEN() gefragt hatte.
Das WECHSELN() von "Frau" und "Herr" hier nicht gut ist, hatte ich gemerkt und bei mir berücksichtigt, bevor ich Deinen Beitrag las.
Gruß Werner
.. , - ...
AW: sollte hier natürlich "Frau Müller" lauten owT
16.08.2021 14:21:26
neopa
Gruß Werner
.. , - ...
AW: nur "z. Hd" wechseln
16.08.2021 13:46:38
neopa
Hallo Azat,
... denn es kann ja auch einen Herrmann Frauenhofer geben.
Für den Fall dass es nur Daten gibt wie in Deinem Beispiel dann besser wie folgt. Formeln
Arbeitsblatt mit dem Namen 'MFF_210816_2'
 ABCD
1DatenVornameNachnameAnrede
2Herr Max MustermannMaxMustermann02
3Frau Anja KrammAnjaKramm01
4Herr Schoot Schoot02
5z. Hd. Herr Nils ZufallsNilsZufalls02
6    

ZelleFormel
B2=GLÄTTEN(WECHSELN(TEIL(WECHSELN(A2;"z. Hd. ";"");6;99);C2;""))
C2=WENN(A2="";"";TEIL(A2;VERWEIS(9;1/(TEIL(GLÄTTEN(A2);ZEILE(A$1:A$29);1)=" ");ZEILE(A:A))+1;99))
D2=WENNFEHLER(VERWEIS(9;1/FINDEN({"Frau"."Herr"};A2)^0;{"01";"02"});"")
Verwendete Systemkomponenten: [Windows (32-bit) NT 6.02] MS Excel 2010
Diese Tabelle wurde mit Tab2Html (v2.6.0) erstellt. ©Gerd alias Bamberg

Gruß Werner
.. , - ...
Anzeige
AW: nur "z. Hd" wechseln
16.08.2021 22:41:35
Azat
Hallo Werner,
vielen Dank für den Support.
Tatsächlich würd ich gern wissen wie Du den Fall mit Herrmann Frauenhofer lösen würdest, natürlich mit den anderen Beispielen aus der Tabelle einbezogen.
Beste Grüße
Azat
AW: dazu ...
17.08.2021 06:18:39
neopa
Hallo Azat,
... musste lediglich wegen "Frau Herrmeni Hofherr" noch zwei Leerzeichen und auch nur in Formel Spalte D einfügen.
Arbeitsblatt mit dem Namen 'Tabelle1'
 ABCD
1DatenVornameNachnameAnrede
2Herr Max MustermannMaxMustermann02
3Frau Anja KrammAnjaKramm01
4Herr Schoot Schoot02
5z. Hd. Frau Ssúe ZufallsSsúeZufalls01
6z. Hd. Herr Herrmann FrauenhoferHerrmannFrauenhofer02
7z. Hd. Frau Herrmeni HofherrHerrmeniHofherr01
8    

ZelleFormel
B2=GLÄTTEN(WECHSELN(TEIL(WECHSELN(A2;"z. Hd. ";"");6;99);C2;""))
C2=WENN(A2="";"";TEIL(A2;VERWEIS(9;1/(TEIL(GLÄTTEN(A2);ZEILE(A$1:A$29);1)=" ");ZEILE(A:A))+1;99))
D2=WENNFEHLER(VERWEIS(9;1/FINDEN({"Frau "."Herr "};A2)^0;{"01";"02"});"")
Verwendete Systemkomponenten: [Windows (32-bit) NT 6.02] MS Excel 2010
Diese Tabelle wurde mit Tab2Html (v2.6.0) erstellt. ©Gerd alias Bamberg

Gruß Werner
.. , - ...
Anzeige
AW: dazu ...
17.08.2021 23:31:15
Azat
Hallo Werner,
danke ich meinte aber eigentlich auch für den Fall, dass eventuell kein "Herr" oder "Frau" vor dem Namen davor steht.
Also z.B.:
Yvonne Meister
Rainer Zufall
...
Wie würde die Unterteilung dann entsprechend in Vorname und Nachname funktionieren?
Schöne Grüße
Azat
Lösungen liefert ex-Excelformeln.de
18.08.2021 10:27:52
Klaus
Hallo Azat,
hier mal was zu lesen.
Erstens: Vor- und Nachnamen trennen, wobei auch Sonderfälle wie Adelstitel beachtet werden:
https://www.herber.de/excelformeln/pages/Vornamen_auch_doppelte_und_Nachnamen_mit_Titel_trennen.html
Um dann mit 99% Sicherheit rauszubekommen ob "Herr" oder "Frau" davor kommt:
https://www.herber.de/excelformeln/pages/anhand_des_Vornamens_bestimmen_ob_Maennlein_oder_Weiblein_Zwitter.html
LG,
Klaus M.
Anzeige
AW: kann in der Formel ergänzt werden ...
18.08.2021 10:59:12
neopa
Hallo Azat,
... wenn eindeutig immer die Reihenfolge: Vorname Name eingehalten wird. Ist das der Fall? Dann ist die Ergänzung doch leicht vorzunehmen.
Allerdings kann dafür die Anrede in Spalte D nicht wirklich zutreffend ermittelt werden.
Gruß Werner
.. , - ...

301 Forumthreads zu ähnlichen Themen

mehreren Zellen in einer Zelle mit Absätzen
Christian

1. Ist es möglich, die markierten Zeilen von Screenshot 1 per Formel/Makro so zu übernehmen, das diese wie in Screenshot 2 übernommen werden? Solche Felder kommen aber öfters und auch mit einzelnen Zeilen dazwischen vor. Die Formatierung (bei Zahlen mit ,00 soll ein langer Strich stehen) sollte...
28.11.2008 15:53:49
Thread-ID: 1028725
3 Beiträge
Anzeige
Vor und Nachnamen trennen
Thorsten_Z

Moin liebes Forum,
stehe im Moment auf dem Schlauch...
In A1 steht ein Name. Nehmen wir mal Hans Herber
in B1 soll nun der Vorname und
in C1 der Nachname stehen.
Wie bekomme ich das hin? Die Formel für Name aus Email von excelformeln.de hat mir fast weiter geholfen. aber eb...
15.02.2009 15:18:00
Thread-ID: 1050889
6 Beiträge
mehrere Rechenoperationen in einer Zelle
marc

Hallo,
ich nehme eine Umrechung in Excel vor. Diese besteht aus 6, nacheinander ablaufenden, Rechenschritten.
1. Wert/255
2. WENN(Wert aus 1 größer 0,0405;(Wert aus 1+0,055/1,055)^2,4;(Wert aus 1/12,92))
3. Wert aus 2*100
4. 0,6502043*Wert aus 3+0,1780774*X2+0,1359384*X3...
20.05.2009 14:16:29
Thread-ID: 1076371
8 Beiträge
Anzeige
Max.Wert mehrerer Werte in einer Zelle
Peter

Hallo Forum,
wer kann helfen?
In einer Zelle sind (5 numer. Werte) gespeichert und duch ein
Semikolon getrennt. Die Zelle kann auch Leerstrings enthalten.
z.B. 4;33;;52;12
Ich möchte den max. Wert an die Textbox 'TxtAltKWo1'
übergeben.
Danke Peter
'Zellinhalt (5...
07.11.2009 20:59:50
Thread-ID: 1115285
3 Beiträge
Inhalt von mehreren Textboxen in einer Zelle speic
mehreren

Hallo Forum,
ich möchte per VBA den Inhalt von mehreren Textboxen in einer Zelle speichern.
(mit Semikolon getrennt)
Da gibt es bestimmt eine bessere Lösung als:
Wer kann helfen?
Cells(1,1).value=TextBox1.text & „;“ & TextBox2.Text……….
Danke Peter
08.11.2009 19:48:16
Thread-ID: 1115412
2 Beiträge
Vornamen, Nachnamen und Titel trennen
Michael

Hallo zusammen,
ich habe folgendes Problem:
Ich habe eine Excel-Datei die einige Namen beinhaltet, diese Namen stehen alle in einer Zelle. Es gibt Namen in der Form Vorname Nachname, aber es gibt auch Namen, die einen Titel beinhalten z.B.:
Dr. med. Thomas Mustermann
Prof. Dr....
01.01.1970 00:00:00
Thread-ID: 1116433
35 Beiträge
Inhalt mehrerer Zellen in einer Zelle vereinen
flo

Hallo zusammen,
ich habe folgendes Problem:
Ich habe in einer Spalte viele Zellen mit Text. Die gesamten Zellen möchte ich nun in einer Zelle vereinen.
Weiß zufällig jemand wie ich das mache? Wenn ich die Zellen nur verbinde klappt das nicht, da die Inhalte dann gelöscht werden?!
01.02.2010 15:43:48
Thread-ID: 1134874
6 Beiträge
String Pfad Name und Dateiname trennen
chris

Hallo VBA Profis,
bitte um Hilfe.
Ich brings einfach nicht alleine hin ;(
Ich bekomme mit unten gezeigter anweißung in cb den String mit Dateinamen und Pfad.
Wie kann ich diesen jetzt trennen einmal msgbox path und einmal msgbox Dateiname
cb = Application.GetOpenFilename
...
08.04.2010 14:27:21
Thread-ID: 1150669
2 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
2
6
5
7
9
2
1
34
5
1
6
10
3
5
3
4
4
4
7
5
14
15
2
2
4