Supportnet Computer
Planet of Tech

Supportnet / Forum / Tabellenkalkulation

Text mit Absatzmarken in einer Zelle





Frage

Hi Loite, Großes Problem: Ich muss größere Texte aus Word in jeweils eine Zelle einer Excel Tabelle einfügen. Wenn aber im Text Absätze oder Zeilenumbrüche vorkommen, fängt Excel jedesmal eine weitere Zelle an (was natürlich die Struktur der Tabelle zerschiesst. Hat jemand 'ne Idee, wie ich die Texte mit Absätzen in eine Zelle eingefügt kriege? Eintippen von Absätzen innerhalb der Zelle geht mit Alt+Enter, also musses doch gehen!!! Danke für Eure Hilfe mm

Antwort 1 von pelle

Hallo MM42,

ich dachte bei MM gibt es im Moment nur 20 % mehr und nicht 42??

Scherz bei Seite!

Wie sieht es aus, wenn Du die Word-Datei nur im Format "nur-TXT" und nicht "TXT+Zeilenschaltung" speicherst!

Diese TXT dann in Excel importierst!

gruss
pelle

Antwort 2 von mm42

Hallo pelle,

interessante Idee - wird aber leider noch schlimmer. D.h. die Anzahl der generierten Zellen wird noch unkontrollierbarer...

Eigentlich soll nur Text per copy&paste aus einer Word-Trabellen-Zelle in eine Excel-Zelle eingefügt werden. Eigentlich. :(

Leider stören Excel offensichtlich die Absätze!

Trotzdem Danke
Gruss
mm

Antwort 3 von want2cu

Hallo mm42,

ich habe zwar keine akademische, aber eine praktikable Lösung gefunden:

Wenn du in Word die Absatzendemarken z.B. ersetzt durch ^ (Suchen-Ersetzen- erweitert - sonstiges - Caret-Zeichen),

dann passen die Texte beim Kopieren nach Excel in eine Zelle.

Dann erzeugst du einmal "zu Fuß" mit der Tastenkombination Alt-ENTER und einem Leerzeichen einen Zeilenumbruch. Das Leerzeichen ist deshalb nötig, damit du diesen Bereich markieren und mit STRG-C in die Zwischenablage hineinbekommst.

Dann in Excel mit ERSETZEN das Caret-Zeichen ( ^ ) eingeben und "ersetzen durch" das Leerzeichen mit dem Zeilenumbruch.
Alle ersetzen und fertig.

Vielleicht hilft dir dieser Lösungsansatz ja weiter.
Mit dem Zeilenumbruch kannst du es im Prinzip mit einem anderen Sonderzeichen genauso machen.

CU
want2cu

Antwort 4 von want2cu

hallo mm42,

wie sieht es denn aus? Bist du mit dem Lösungsvorschlag weiter gekommen?

CU
want2cu

Antwort 5 von mm42

Hallo want2cu,

Eigentlich ist das genau die Lösung....

Nur bin ich entweder zu blöd oder es geht nicht :(

Das per Hand eingegebene ALT-Enter reagiert im Ersetzen Dialog immer als Leerzeichen, egal ob ich in der zu Fuß Zelle ein Leerzeichen mit eingebe oder Text mit Alt-Enter dazwischen, Der Zeilenumbruch kommt bei Copy&Paste nicht wieder raus ...

viele Grüße
mm

Antwort 6 von uwe radecke

Hallo mm!
Bin wohl bisschen spät dran, trotzdem noch ein Vorschlag:
Kopiere Deine Word-Datei in ein Blatt Deiner Excel-Arbeitsmappe. Übernimm folgendes Makro, das Du noch auf den Textumfang (d.h. auf die Zeilenzahl) anpassen mußt.

Sub test()
Dim inhalt As String
inhalt = Sheets(1).Cells(1, 1).Value _
& Chr(10) & Sheets(1).Cells(2, 1).Value _
& Chr(10) & Sheets(1).Cells(3, 1).Value _
& Chr(10) & Sheets(1).Cells(4, 1).Value _
& Chr(10) & Sheets(1).Cells(5, 1).Value _
& Chr(10) & Sheets(1).Cells(6, 1).Value _
& Chr(10) & " " & Chr(10) & Sheets(1).Cells(8, 1).Value
Sheets(2).Cells(1, 1).Value = inhalt
End Sub

Dies dient mir dazu, einen Adressenblock (8 Zeilen, davon 1 Leerzeile) in eine Zelle zu stopfen.
chr(10) ist der Zeilenumbruch innerhalb einer Zelle. Wenn Du Absätze in Deinem Dokument hast (sprich, Leerzeilen zwischen Textblöcken), dann behandle sie wie im Beispiel, nämlich, indem Du 2x hintereinander ein chr(10) einfügst.

Ich hoffe, es nützt Dir noch was.
Viele Grüße!
Uwe


Antwort 7 von mm42

@ uwe radecke

funktioniert!

Danke
mm