SoftMaker.de

Ja, anbei den Code mit einer Schleife, das Script läuft solange, bis eine Zelle der betreffenden Spalte leer ist, was ja auch der Normalfall ist.

Ich habe es ausprobiert und es scheitert z.B. am Rumpelstielzchen (wenn z.B. nur der Nachname in der Zelle steht) und an Manfred Rudolf Kreuzwendedich Maria Graf von Salm-Hoogstraeten. Bei Rumpelstilzchen kann ich es verstehen, da von rechts her bis zum ersten Leerzeichen die Anzahl der Zeichen gezählt wird. Und da Rumpelzstielzchen kein Leerzeichen hat, funktioniert es nicht. Aber bei Manfred Rudolf Kreuzwendedich Maria Graf von Salm-Hoogstraeten erfolgt die Trennung in den Vornamen Manfred Rudolf Kreuzwendedich Maria und den Nachnamen Graf von Salm-Hoogstraeten. Warum aber? Erwartet habe ich den Nachnamen Salm-Hoogstraeten.
Seltsamerweise funktioniert auch Karl Barth nicht (Verzeihung, ich meine nur die Verwendung des Namens bei der Ausführung des Skriptes), und Sabine Leutheusser-Schnarrenberger, Johann Gottfried Bemme, E. Wallace nicht. Bei John F. Kennedy nimmt er er das F. zum Nachnamen. Wirklich seltsam ....


Während ich noch beim Überlegen und Formulieren war, stellte Dewes das neue Skript rein und nun sind alle Fehler bis auf Rumpelstielzchen weg. Beim Skript kam ja nur die Schleife hinzu. Lag meinerseits ein Bedienfehler zugrunde? Ich markierte die Zelle mit dem vollen Namen und dann startete ich das (Vorgänger)Skript.

Ist ja egal, es funktioniert nun. Nur noch das Leerzeichen beim Nachnamen entfernen. Und alles ist gut.

Und vielleicht ein Hinweis in die Rubrik BasicMaker stellen, damit man dort auch auf die Lösung aufmerksam wird.

Tschuligung, wenn ich wieder mal Bösewicht spiele, aber:

Kim und Park sind in den betreffenden Sprachen Familiennamen, stehen aber den grammatischen Regeln dieser Sprachen entsprechend an erster Stelle.
Bei spanischen Namen muss man bisweilen einfach wissen, was ein Vor- und was ein Nachname ist, je nach dem ist eben beides möglich.
Und der durchaus bekannte Rechtshistoriker René Pahud de Mortanges hört auf den Familiennamen Pahud de Mortanges, sein Vorname ist nur René (Der Setzer ist beim Literaturverzeichnis auch reingefallen und hat nur de Mortanges kursiv gesetzt, hehe.).

Weil Namen so vielgestaltig sind, ist es wohl schwer, einen Automatismus zu basteln. Da müssten schon ein paar Zusatzregeln hin, etwa: Graf, Fürst, Prinz, Baron in Namen wie "Ott Graf Lambsdorff" als Teil des Nachnamens erkennen. Das setzt dann aber schon fast einen Parser voraus.

Verstehe ich nicht ganz, aber ist kein Problem, ganz einfach
Wenn du nach dem ersten End IF noch folgenden Code einfügst, sind auch Namen ohne Vornamen (Rumpelstielzchen) abgefangen:

das stimmt schon, wenn ich viele solcher Namen hätte, würde ich in der Tabelle 4 Spalten einrichten:

Titel =. Geheimrat
Vorname = Johann Wolfgang
Adel = von
Nachname = Goethe

Wenn man diese Zusätze im Script vorab definiert und abfragt, könnte man sie auf die richtigen Spalten verteilen, und hätte sie bei Serienbriefen zur Verfügung.

Aber z.B. ein "von und zu Guttenberg" hätte ich immer noch nicht abgefangen. Da aber solche Situationen doch selten sind, würde ich die nachträglich händisch kiorrigieren. Das dürfte einfacher sein, als ein aufwändiges Script zu schreiben.

Danke!
Karl

@PeterQ
Das scheint ein "Thread der Missverständnisse" zu werden. Mein Einwand bezog sich auf den Ursprungsbeitrag von Karl Barth und selbst dieser war nicht abwertend gemeint. Wenn Du wüsstest, wieviele Funktionen ich unter Excel schon "mißbraucht" habe, um ein gewünschtes Ergebnis zu erzielen .....
Mir ging es um in dem Beitrag nur darum, zu zeigen, dass SMO nicht die Schuld trifft, wenn eine "mißbrauchte" Funktion nicht so funktioniert, wie man es sich ausgedacht hat.
Aber Karl hat ja schon einen super Lösungsweg gefunden und mit der Hilfe von Dewes werden auch die "skurrilsten" Wünsche war.

Hüstel, räusper...

Ich habe hier einfach mal ein bisschen mitgelauscht - und das Skript gleich mal begeistert übernommen!

Na ja, und weil das doch so toll klappt, ich aber absolut keine Ahnung von Basic-Programmierung habe... also... da habe ich mich halt gefragt: Vielleicht würde einer von den Profis hier das Ganze ja auch noch für den umgekehrten Fall schreiben - ich habe die Spalten "Name" und "Vorname" (meistens ja in dieser Reihenfolge) und hätte jetzt gerne eine Spalte mit den kompletten Namen... Ich fänd's super!

Dafür brauchst du nicht mal ein Script, da tut es auch eine einfache Formel.
Wenn der Nachname in A1 steht und der Vorname in B1, lautet die Formel: =B1&" "&A1

Gruß
Jossi

Hallo käsekuchen,
hier ist das gewünschte Skript:

Super, danke vielmals!! Ich werd's später gleich mal ausprobieren.

Klappt super - danke nochmal!

Eine klitzekleine Kleinigkeit hätte ich ja noch, dann bin ich ruhig: Habe gerade noch einmal das erste Skript, das zum TRENNEN von Vor- und Nachnamen, ausprobiert - in der Spalte "Nachname" habe ich dann immer ein Leerzeichen vor dem Nachnamen. Das hatte ja auch PeterQ schon erwähnt - und Dewes hatte zwei Skript-Zeilen zur Lösung geliefert:

az = pm.ActiveSheet.Cells.Item(zeile,spalte).Value
az = Trim(az)

Die habe ich jetzt an der Stelle eingefügt, wo vorher nur

az = pm.ActiveSheet.Cells.Item(zeile,spalte).Value

stand. Das scheint aber nicht die richtige Stelle zu sein, denn der gewünschte Effekt bleibt aus. Hilft mir Basic-Idioten noch einmal jemand? Müssen die Zeilen vielleicht vor "exit for"?

Hallo Käsekuchen,

hier nochmal das komplette Skript mit 'getrimmten' Leerzeichen:

Der codeist eigentlich überflüssig, es genügt