Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
956to960
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
956to960
956to960
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

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

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

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

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

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige