Hey Schnurtzer,
was meinst du mit jede Textzeile in einer Excel-Zeile. Das ist doch jetzt schon der Fall. Zumindest beim Beispieldokument. Jedes Zeilenumbruchzeichen erzeugt eine neue Excelzeile. Schwer ist die Auflösung des Blocks nicht, da es sich um reine Textaktionen handelt. Mit Instr. Prüfe ich ob der Text ein Zeilenumbruchzeichen - Chr(10) - enthält. Eigentlich handelt es sich um Chr(11), welches ich weiter oben im Code durch Chr(10) ersetzt habe. Dann gibts da noch die Absatzmarke - Chr(13) bzw. umgekehrtes P - die aber in den Blöcken des Beispieldokuments nicht als Zeilenumbruch vorkommt, sondern nur den jeweiligen Block abschließt. Daher habe ich hierfür keinen Workflow angesetzt.
Enthält der Text also ein Zeilenumbruchzeichen, wandel ich ihn mit Split in ein Array um, welches ich dann mit For Each Zeile für Zeile durchgehe.
Alle Funktionen zum Bearbeiten von Texten findest du hier. Damit hab ich seinerzeit meine Ersten Schritte gemacht.
Beruflich, nein danke. Das ist und bleibt bei mir ein Hobby. Aber ich mach das jetzt schon seit über 20 Jahren. Das ist eine lange Zeit in der ich viel gelernt habe. So kann ich mein Wissen auch ab und an im Beruf einsetzen. Ob man diesen von mir mal eben schnell heruntergeklimperten Code als Professionell bezeichnen kann, weiß ich nicht. Ist schon ziemlich Spaghetti-Like geworden. Da hab ich schon ganz Andere Sachen programmiert. Im Moment fällt mir nicht ein, wie ich diesen noch vereinfachen könnte. Aber solange er funktioniert ist für mich erstmal das Ziel erreicht.
Wenn du weitere Fragen hast, ich bin hier öfter unterwegs.
Gruß Mr. K.
|