Tabellenblatt in Text umwandeln

Hallo liebe VBA Experten,
mein Kenntnisstand: Excel: "bin zufrieden", VBA: "Fortschritte erkennbar"
Ich möchte aus einem Tabellenblatt, das als Eingabeformular gestaltet ist , einen Bericht als Text erstellen.
Angenommen, es geht um die Zellen A1 bis A100 (in Wirklichkeit ist es etwas komplexer. Es geht erstmal nur um das Prinzip). Ich würde nun gerne alle Zellen in einen Textstring aneinanderreihen.
Zwischenfragen: a) Ist das sinnvoll ? b) Wie lang darf so ein String sein ?
Main question: Ist es technisch machbar, z.B. mit einer Schleife ("for x =1 to 100"), immer die nächste Zelle in den Textstring einzubauen bzw. an diesen anzuhängen ? Wenn ja, wie spreche ich das an ?
c) In so einen Textstring kann man meines Wissens nach Zeilenwechsel einbauen ("Ch 13"oder so ähnlich"). Kann man auch Tabulatoren setzen, um die Form der Darstellung zu gestalten ?
Ist das alles eine naive Schnapsidee eines Dilettanten und ihr würdet das ganz anders angehen ? Wenn ja wie ?
Vor dieser Anfrage habe ich reichlich recherchiert, aber nichts dazu gefunden. Kann mir jemand helfen ?
LG Bernhard

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Hi Bernhard,
die Textbox kann selbstverständlich richtig mit der Variablen "ausgabe" umgehen; es ist nur so, daß diese in jedem Durchlauf der FOR-Schleife überschrieben wird: ausgabe = Range("A" & zeile) & " usw. "
Deshalb hat sie nur den Wert des letzten Schleifendurchlaufs.
Tja, die Frage ist, was Du letztlich haben willst. "Bearbeiten" kannst Du die Textdatei, indem Du sie einfach mit dem Editor (oder meinetwegen auch mit Word) öffnest (das kann man zur Not auch mit VBA anstoßen). Die Bearbeitung geht damit sicher deutlich komfortabler als in einer Textbox.
Aber: wozu dat janze? Text ist für den Programmierer unhandlicher als Excel, also frage ich mich, was Du im Einzelnen vorhast.
Nun gut. Hier kurz der Code einer weiteren Funktion ...

Sub String_Erzeugen()
Dim zeile As Integer
Dim ausgabe As String
ausgabe = ""
For zeile = 1 To Range("I18")
ausgabe = ausgabe & "Ausgabe: " & vbTab & _
Range("A" & zeile) _
& " " & Range("B" & zeile) _
& " " & Range("C" & zeile) & vbLf
Next zeile
Debug.Print ausgabe
End Sub

... die die Variable ausgabe ins Debug-Fenster schreibt; die Zuweisung in Deine Textbox sollte genauso hinhauen.
Ich habe nur irgendwas im Hinterkopf, daß ein Excel-String "irgendwo" begrenzt ist (bin zu faul, jetzt selbst zu googeln), so daß das bei richtig großen Datenmengen instabil werden könnte.
Happy Exceling,
Michael

Beliebteste Forumthreads (12 Monate)

8
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

358 Forumthreads zu ähnlichen Themen

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

Tabellenblatt in Text umwandeln

8 Beiträge zum Forumthread Beiträge zu diesem Forumthread

358 Forumthreads zu ähnlichen Themen

VBA Beispiele zu verwandten Themen

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

8
Beiträge zum Forumthread

Beiträge zu diesem Forumthread