Bücherliste durchsuchen

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

…da vorstellst, Thorsten,
noch dazu ohne Hilfsspalten! Das würde man sicher sinnvoll mit einer speziell darauf abgestimmten VBA-Subroutine lösen können. Mit xlStandardFmln nebst -Fktt dürfte es sehr schwer wdn, wenn viell auch nicht ganz unmöglich.
Habe deine Datei mal zum Anlass genommen, eine UDF, die ich voriges Jahr geschrieben hatte, darauf anzusetzen…
Die gute Nachricht:
Es geht, wenn man noch eine weitere UDF und einige StandardFktt zuhilfe nimmt. Die Formel wäre dann zwar etwas länger, aber noch im Rahmen …
=WENN(ISTZAHL(SUCHEN(",";INDEX(SplitVx(E1;{" (Taschen"."buch) "."TB"." von "." - "});2)));
GLÄTTEN(PickIn(INDEX(SplitVx(E1;{" (Taschen"."buch) "."TB"." von "." - "});2);;{2.1};", ";" "));
INDEX(SplitVx(E1;{" (Taschen"."buch) "."TB"." von "." - "});2))&", "&
INDEX(SplitVx(E1;{" (Taschen"."buch) "."TB"." von "." - "});1)
Wie man leicht erkennen kann, geht es bei SplitVx um Trennung des Suchbegriffs auch an mehreren unterschiedlichen Stellen, was keine StandardFkt (auch keine von VBA!) leistet. PickIn ist dann ggf zusätzlich nötig, um die Teile des Autorennamens in die gewünschte Reihenfolge zu bringen, alles andere, um daraus dann den normierten Suchbegriff zu erstellen. Allerdings könnte der bei der Suche eher kontraproduktiv sein, es sei denn, du hast dafür schon eine Lösung, die hier nicht doppelt gemoppelt wäre, weil ja SplitVx schon ein Datenfeld bereit stellt, dessen Komponenten sich gut bei einem VERGLEICH bzw VERWEIS in der Liste einsetzen ließen.
Die schlechte Nachricht:
Habe beim Testen noch eine(n) Fehler/Ungenauigkeit in SplitVx festgestellt, der/die erst noch behoben wdn muss, denn hier ist es die Irma Krauß, die Probleme bereitet (das 1.Element ist leer, dann erst folgen die relevanten). Außerdem wdn von der UDF noch 2 weitere intern bemüht (sie ist schließlich ziemlich universell). Da muss ich erst prüfen, ob die entsprd PgmTeile für deinen Zweck benötigt wdn. Bei der 2.UDF könnte es ähnlich sein (ist Bestandteil eines AddIns!) — sie wäre aber leichter durch Standardfktt (wenn auch umständlicher) zu ersetzen.
Also, falls ich es nicht mehr rechtzeitig schaffe (nächste Woche kaum Gelegenheit!) und du daran interessiert bist, musst du dich ggf in ca 10 KT nochmal melden.
Falls du kein Interesse daran hast, bitte gleich mitteilen, dann kann ich mir mit den Korrekturen Zeit lassen.
Gruß + schöSo, Luc :-?
PS@robert: Falls du mitliest – 1.UDF steht in PrinzipL4 – Nachricht folgt!

…Thorsten,
denn es ging doch etwas schneller. Die Formel lautet nun …
=WENN(ISTZAHL(SUCHEN(",";INDEX(Temp(SplitVx(E1;{" (Taschen"."buch) "."TB"." von "." - "}));2)));
INDEX(SplitVx(INDEX(Temp();2);", ");2)&" "&INDEX(SplitVx(INDEX(Temp();2);", ");1);
INDEX(Temp();2))&", "&INDEX(Temp();1)
Die Teilung von Taschenbuch ist der bisherigen Begrenzung der Trennzeichenlänge auf 9 Zeichen geschuldet. Das könnte sich in künftigen Versionen aber noch ändern. Auf PickIn habe ich nun verzichtet und dafür eine neue Mini-UDF Temp hinzugefügt, damit die Formel nicht so lang wird. Ihren Zweck erfüllen sonst meine 3 UDF Rmb (remember →ungefähr analog), Rmd (remind →deutlich komplexer) und TempStoRd (→mit optionaler Rundungsfkt inkl dem Hansueli sicher vertrauten „Rappen-Runden“), falls mal jemand über eine davon „stolpert“.
Habe SplitVx so auskommentiert, dass es für deinen Zweck auch ohne die beiden intern aufgerufenen UDFs fktionieren dürfte. Die beiden Enums musst du aber beibehalten oder ihre Konstanten im Fktspgm durch die repräsentierten Werte ersetzen!
Anbei sende ich dir deine Datei zurück. Du wirst jetzt sicher bemerken, dass du dir in der Autorenspalte eine Falle eingebaut hast, die ich nicht korrigiert, aber in den zusätzlichen Suchbspp umgangen habe.
Falls du an einer Beschreibung des vollen Fktsumfangs von SplitVx interessiert sein solltest, könnte ich die hier ebenfalls einstellen.
Für erfahrene VBA-Bastler:
Wenn jemand den vollen Fktsumfang der o.g. UDF wiederherstellen möchte, muss er zuerst für einen Ersatz der intern aufgerufenen Fktt MaskOnX (→ zB durch ein RegEx-Konstrukt mit passenden Mustern oder evtl auch die uralte, in den Tiefen des Archivs schlummernde MaskOn-Version) und vor allem VPairs sorgen (→ Herstellung eines Variants mit einem Datenfeld in Form eines vertikalen Vektors, dessen Elemente aus horizontalen Vektoren bestehen, die ggf als 1.Element eine lfdNr enthalten). Zu deren Fktsumfang könnte ich auch eine Beschreibung hier einstellen.
Gruß & schöwnatrübSo, Luc :-?

Beliebteste Forumthreads (12 Monate)

18
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

Bücherliste durchsuchen

18 Beiträge zum Forumthread Beiträge zu diesem Forumthread

VBA Beispiele zu verwandten Themen

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

18
Beiträge zum Forumthread

Beiträge zu diesem Forumthread