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

Textboxumbruch

Forumthread: Textboxumbruch

Textboxumbruch
29.02.2008 13:18:00
Ludmila
Hallo,
ich versuche einen Textboxwert auf Zellen im Tabellenblatt aufzuteilen, komme aber nicht dahinter wie.
Vor Herbers CD habe ich zwar die Lösung als Vorgabe wenn der Text aufgerufen wird, "Name & vbCr" wie kann ich dies erreichen wenn ich den Text in die Textbox einer UF schreiben.
Der Text zB. 500 Zeichen soll nun nach 65 Zeichen in eine neue Zelle eingetragen werden usw.
Danke!
Gruß
Ludmila

Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Textboxumbruch
29.02.2008 13:35:00
Rudi
Hallo,
so?

Sub tt()
Dim MeinText, i As Integer
MeinText = TextBox1.Value
For i = 1 To Len(MeinText) Step 65
Sheets(1).Cells(Rows.Count, 2).End(xlUp).Offset(1, 0) = Mid(MeinText, i, 65)
Next i
End Sub


Gruß
Rudi
Eine Kuh macht Muh, viele Kühe machen Mühe

Anzeige
AW: Textboxumbruch
29.02.2008 15:28:00
Peter
Hallo Ludmilla,
sieh dir in der beigefügten Mappe einmal das Tabellenblatt "Tabelle3" und das UserFom(ular) an.
Vielleicht hilft dir das weiter.
https://www.herber.de/bbs/user/50309.xls
Gruß Peter

AW: Textboxumbruch
29.02.2008 18:05:00
Ludmila
Danke für Eure Hilfe.
Lg Ludmila
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige