Anzeige
Archiv - Navigation
352to356
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
352to356
352to356
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Text in Zelle bis max 30 Zeichen danach neue Z...

Text in Zelle bis max 30 Zeichen danach neue Z...
16.12.2003 15:30:36
Steffen
hallo und guten tag,

brauche unbedingt hilfe.

problem:

text wird in zelle geschrieben. wenn 30 zeichen erreicht sind soll zelle in neuer spalte gefüllt werden bis wiederum maximal 30 zeichen erreicht sind und dann wiederum in die dritte zelle (wieder in einer neuen spalte) weitergeschrieben wird.
also 3 mal 30 zeichen in drei spalten.

ich hab einfach keinen lösungsansatz.

besten dank im voraus für eure hilfe

steffen

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Text in Zelle bis max 30 Zeichen danach neue Z...
16.12.2003 17:37:46
Lukas
Hier ein kleines Tool:

Dim länge As String
Dim t As Integer


Sub test()
t = 1
n = 255
For Each wert In Worksheets(1).Range("C1:C5")
länge = wert.Text
länge4 = Left(länge, 30)
If länge4 > "" Then
erste = Left(länge, 30) 'ersten 30 Buchstaben
rest = Mid(länge, 30, n) 'alles ab 30
Range("C" & CInt(t) & "").Select
ActiveCell.Value = erste
Range("C" & CInt(t + 1) & "").Select
ActiveCell.Value = rest
End If
t = t + 1
Next wert
End Sub


Der Text in der "C1" wird genommen und auf die Folgenden Zellen(C2:C5)
zu 30teilen aufgesplittet!
Viel Spaß!
Anzeige
ohne vba?
16.12.2003 23:36:48
Reinhard
Hi Steffen,
angenommen in A1 steht dein Text, dann in C1 reinschreiben:
=TEIL($A$1;(SPALTE()-3)*30+1;30)
und nach rechts in die Spalten kopieren.
Gruß
Reinhard

329 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige