Datum

Titel

26.04.2024 12:46:38

Nutzereingaben Speichern und Laden

26.04.2024 11:49:48

VAB und Bedingte Formatierung nimmt die Farbe im Makro nicht

26.04.2024 11:38:46

Acrobat PDF Formularfelder mit Excel ausfüllen

26.04.2024 11:23:04

zählen wenn - aber nur die selektierten Zeilen

Du findest keine passende Antwort auf Deine Frage?

Stelle Deine Frage in unserem Live-Forum

Archiv - Navigation

1668to1672

Aktuelles Verzeichnis

Verzeichnis Index

Übersicht Verzeichnisse

Vorheriger Thread

Rückwärts Blättern

Nächster Thread

Vorwärts blättern

HERBERS

Excel-Forum (Archiv)

20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Rückwärts Blättern

Aktuelles Verzeichnis

Übersicht Verzeichnisse

Vorwärts blättern

Inhaltsverzeichnis

Längste Zeichenkette einer Zelle

Forumthread: Längste Zeichenkette einer Zelle
11 Beiträge zu diesem Forumthread
Anzeige
315 Threads zu ähnlichen Themen
VBA Beispiele zu verwandten Themen

Top 100 Forumthreads

17.01.2019 17:15:05

Frank68

Hallo zusammen,
ich suche nach einer Formel, die die längste aus Buchstaben bestehende Zeichenkette einer Zelle ausgibt. Die betreffende Zelle kann Leerzeichen, Sonderzeichen, Bindestriche etc. enthalten. Beispiel: "cvs. x812 fhskkkwid.dd. 34662"
Die längste gesuchte Zeichenkette wäre in diesem Falle "fhskkkwid".
Hat jemand eine Idee? Vielen Dank vorab.

11
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

UDF VBA Lösung

17.01.2019 17:30:21

ChrisL
AW: UDF VBA Lösung

17.01.2019 17:46:32

Frank68
Mit universellen UDFs geht's bspw so, ...

21.01.2019 04:48:26

Luc:-?
AW: Längste Zeichenkette einer Zelle

17.01.2019 17:31:12

onur
AW: eine Monster-Lösungsformel ...

17.01.2019 17:49:29

neopa
AW: eine Monster-Lösungsformel ...

17.01.2019 18:13:40

Frank68
AW: eine Monster-Lösungsformel ...

17.01.2019 18:39:08

Luschi
AW: wieso? ...

17.01.2019 19:10:58

neopa
das entspricht NICHT den Vorgaben

17.01.2019 22:34:30

WF
AW: ja, hatte mich völlig falsch "orientiert" ...

18.01.2019 08:49:39

neopa
spiel mal mit unserer

17.01.2019 18:17:32

WF

UDF VBA Lösung

17.01.2019 17:30:21

ChrisL

Hi Frank
Folgender Code in ein Standardmodul

Function MaxLen(s As String) As String
Dim ar As Variant, i As Integer
s = Replace(Replace(s, " ", "."), "..", ".")
ar = Split(s, ".")
For i = LBound(ar) To UBound(ar)
If Len(MaxLen)

Danach als Formel verwendet
=MaxLen("cvs. x812 fhskkkwid.dd. 34662")
cu
Chris

AW: UDF VBA Lösung

17.01.2019 17:46:32

Frank68

Hallo Chris, danke, funktioniert. Gruß, Frank

Mit universellen UDFs geht's bspw so, ...

21.01.2019 04:48:26

Luc:-?

…Frank (singulare MatrixFml):
{=Splint(MaskOn(A1;"bst");;VERGLEICH(MAX(LÄNGE(Splint(MaskOn(A1;"bst"))));LÄNGE(Splint(MaskOn(A1; "bst")));0)) }
Vorteil: Die beiden UDFs können auch anderweitig genutzt wdn.
Links:
MaskOn (Vs2.1) https://www.herber.de/forum/archiv/1344to1348/1344962_Initialen_bei_Doppelnamen.html#1345181
Splint (Vs1.2) https://www.herber.de/forum/archiv/1584to1588/t1584372.htm#1584465
Morhn, Luc :-?

AW: Längste Zeichenkette einer Zelle

17.01.2019 17:31:12

onur

VBA!

AW: eine Monster-Lösungsformel ...

17.01.2019 17:49:29

neopa

Hallo Frank,
... könnte z.B. für Text in A1 so aussehen:
=TEIL(A1;AGGREGAT(15;6;ZEILE(A1:A99)/ISTFEHL(SUCHEN(" ";(TEIL(A1;ZEILE(A1:A99)
;AGGREGAT(14;6;AGGREGAT(14;6;ZEILE(A1:A99)/(TEIL(" "&A1&" ";ZEILE(A1:A99);1)=" ");
ZEILE(A1:A55))-AGGREGAT(14;6;ZEILE(A1:A99)/(TEIL(" "&A1&" ";ZEILE(A1:A99);1)=" ");
ZEILE(A2:A9));1)-1))));1);AGGREGAT(14;6;AGGREGAT(14;6;ZEILE(A1:A99)/
(TEIL(" "&A1&" ";ZEILE(A1:A99);1)=" ");ZEILE(A1:A55))-AGGREGAT(14;6;ZEILE(A1:A99)/
(TEIL(" "&A1&" ";ZEILE(A1:A99);1)=" ");ZEILE(A2:A9));1)-1)
Gruß Werner
.. , - ...

AW: eine Monster-Lösungsformel ...

17.01.2019 18:13:40

Frank68

Alter Vater... Ich bin beeindruckt.

AW: eine Monster-Lösungsformel ...

17.01.2019 18:39:08

Luschi

Hallo Frank68,
da staune ich aber, meine Versuche sind da nicht zufriedenstellend.
Zellwert A1: 123,abcdeft.sjshsgsfsdwrt gjghgugztzruezdgs
Ergebnis: 123,abcdeft.sjshsgsfsdwrt
Gruß von Luschi
aus klein-Paris

AW: wieso? ...

17.01.2019 19:10:58

neopa

Hallo Luschi,
... das Ergebnis für Dein Beispiel entspricht mE genau den Vorgaben.
Gruß Werner
.. , - ...

das entspricht NICHT den Vorgaben

17.01.2019 22:34:30

er wollte:
"die längste aus Buchstaben bestehende Zeichenkette"
Punkte und Zahlen sind keine Buchstaben !
Du bestimmst das längste Wort in einem Satz - siehe unsere:
http://www.excelformeln.de/formeln.html?welcher=502
Unsere Formel dort ist analog Deiner:
{=TEIL(A1;MIN(WENN(ISTFEHLER(FINDEN(" ";TEIL(A1;ZEILE(1:999); MAX(FINDEN("#"; WECHSELN(A1&WIEDERHOLEN(" ";99);" ";"#";ZEILE(1:99)))-FINDEN("#";WECHSELN(" "&A1&WIEDERHOLEN(" ";99); " ";"#";ZEILE(1:99)))));1));ZEILE(1:999))); MAX(FINDEN("#";WECHSELN(A1&WIEDERHOLEN(" ";99);" ";"#"; ZEILE(1:99)))-FINDEN("#";WECHSELN(" "&A1&WIEDERHOLEN(" ";99);" ";"#";ZEILE(1:99))))) }
WF

AW: ja, hatte mich völlig falsch "orientiert" ...

18.01.2019 08:49:39

neopa

Hallo WF, hallo Luschi, hallo Frank,
... hatte lediglich "Zeichenkette" für mich als Zielstellung "abgespeichert" und mich daran orientiert und dann selbst auf den Hinweis von Luschi nicht noch einmal die Aufgabenstellung nachgelesen. Sorry, Frank, sorry Luschi, danke WF
Gruß Werner
.. , - ...

spiel mal mit unserer

17.01.2019 18:17:32

http://www.excelformeln.de/formeln.html?welcher=502
WF