Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: 03.01.2005 13:35:45 spezieller Zeilenumbruch in Ze

03.01.2005 13:35:45 spezieller Zeilenumbruch in Ze
14.01.2005 11:51:28
Otto
Guten Tag allemiteinander
ich hoffe, jemand kann uns helfen bei folgendem Problem:
Textdatensätze (max. 256 Zeichen) werden von Filemaker Datenbank ins Excel exportiert. Wie kann man nun den Text in mehrere Zeilen in derselben Zelle, (mit einer maximalen Anzahl Zeichen von 52 Zeichen pro Zeile) aufteilen, wobei der Text grammatikalisch korrekt bleiben muss (Silbentrennung, Anordnung Satzzeichen)?
Bitte keine Antworten mit "Ausführen, Zellen, Ausrichtung, Zeilenumbruch", da diese das Problem nicht lösen.
Ansonsten ist alles willkommen, was auch nur annähernd zur Lösung beiträgt.
Vielen Dank für Eure Unterstützung.
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: 03.01.2005 13:35:45 spezieller Zeilenumbruch i
14.01.2005 13:50:47
Josef
Hallo Otto!
Grundsätzlich möchte ich anmerken, das Excel nunmal kein Textverarbeitungsprogramm ist!
Das mit der Silbentrennung weis ich nicht,
aber den Text aufteieln kannst du mit dieser Funktion.

Function breakText(ByVal text As String, ByVal länge As Integer) As String
Dim tmp As String, str As String
Dim lenT As Integer, i As Integer, n As Integer
lenT = Len(text)
n = 1
i = 1
Do
tmp = Mid(text, i, länge)
If lenT - i >= länge Then
n = Len(tmp) - InStr(1, StrReverse(tmp), " ") + 1
Else
n = Len(tmp)
End If
str = str & Trim(Left(tmp, n)) & vbLf
i = i + n
Loop While i < lenT
breakText = Left(str, Len(str) - 1)
End Function
'als Funktion in VBA
Sub test()
[B1] = breakText([A1], 52)
End Sub

Anwendung in der Tabelle:

=breakText(A1;52)

Gruß Sepp
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige