wie kann ich Nachname und Vorname (stehen beide in einer Zelle,bei manchen
steht noch die Abteilung),
trennen das beide in einer eigenen Zelle stehen und danach die Abteilung.
Danke
Andreas
wenn Vorname und Nachname durch ein Leerzeichen getrennt sind und evtl.
zusammengestzte Vor-/Nachnamen mit Bindestrinch und nicht mit Leerzeichen
verbunden sind, dann kannst Du folgende zwei Formeln nehmen, um Vor- und
Nachnamen aus einem String herauszufiltern:
So steht z.B. in A1:
Hans-Josef Auweiler-Möllenrieder
Vornamen herausfiltern:
=LINKS(A1;FINDEN(" ";A1;1)-1)
Nachnamen herausfiltern:
=RECHTS(A1;LÄNGE(A1)-FINDEN(" ";A1;1))
Hoffe, das hilft Dir weiter,
- Jens -
Krankl9 <kra...@aol.com> schrieb in im Newsbeitrag:
8bngrq$gbt$1...@galaxy.mchh.siemens.de...
Auf diese Weise kannst Du die Abteilungsbezeichnung bestimmt auch noch
ermitteln.
Viele Grüße
Bernd
//////////////////////////////////////
// Die MacHero EXCEL/WORKS Homepage
// Microsoft Excel MVP
// http://members.aol.com/Machero
//
// Computerbild 06/2000 "Buch der Woche" unter
// http://members.aol.com/Machero/derexcel.html
Krankl9 schrieb:
angenommen, der Text steht in Zelle A3 in folgender Reihenfolge:
'Vorname Nachname Abteilung'
dann erhälst Du den Vornamen mit:
=LINKS(A3;FINDEN(" ";A3;1)-1)
den Nachnamen mit:
=TEIL(A3;FINDEN(" ";A3;1)+1;FINDEN(" ";A3;FINDEN(" ";A3;1)))
die Abteilung mit:
=WENN(ISTFEHLER(RECHTS(A3;LÄNGE(A3)-FINDEN(" ";A3;FINDEN("
";A3;FINDEN(" ";A3;1)+1))));"";RECHTS(A3;LÄNGE(A3)-FINDEN("
";A3;FINDEN(" ";A3;FINDEN(" ";A3;1)+1))))
Füge also 3 Spalten ein, kopiere die obigen Formeln in diese Spalten.
Danach kannst Du die Formeln überschreiben, indem Du die neu
eingefügten Spalten markierst, dann BEARBEITEN | KOPIEREN und
BEARBEITEN | 'INHALTE EINFÜGEN' | WERTE.
Wenn nicht ein Leerzeichen sondern zB ein Komma als Trennzeichen
verwendet wird, mußt Du in der Formel statt " " dann "," oder ", "
verwenden.
MfG Ullrich
Krankl9 <kra...@aol.com> schrieb in im Newsbeitrag:
8bngrq$gbt$1...@galaxy.mchh.siemens.de...
markiere mal die Spalte und dann im Menü:
DATEN / Text in Spalten.
Sollte nun leicht sein, alles zu trennen.
MfG
Marco
Krankl9 schrieb:
"Krankl, Andreas" oder "Krankl,Andreas" oder Krankl, Andreas, Buchhaltung"
dann gehts mit folgenden benutzerdefinierten Funktionen, die du dann in
deiner Tabelle benutzen kannst.
Function Nachname$(Zeichenkette$)
Dim KommaPos%
KommaPos = InStr(1, Zeichenkette, ",")
Nachname = Mid(Zeichenkette, 1, KommaPos - 1)
End Function
Function Vorname$(Zeichenkette$)
Dim KommaPos%
KommaPos = InStr(1, Zeichenkette, ",")
Zeichenkette = LTrim(Mid(Zeichenkette, KommaPos + 1))
KommaPos = InStr(1, Zeichenkette, ",")
If KommaPos = 0 Then
Vorname = Zeichenkette
Else
Vorname = Mid(Zeichenkette, 1, KommaPos - 1)
End If
End Function
Fehlerfrei funktionierts aber nur, wenn die Texte im oben beschriebenen
Format eingegeben wurden. Bei uneinheitlicher Schreibweise wird
komplizierter.
Gruß,
Thomas
Krankl9 schrieb in Nachricht <8bngrq$gbt$1...@galaxy.mchh.siemens.de>...
Anja
"Krankl9" <kra...@aol.com> schrieb im Newsbeitrag
news:8bngrq$gbt$1...@galaxy.mchh.siemens.de...