[Excel] Fehlerhafter Übertrag Textfeld Multiline und Verbundene Excelzelle

Philipp

Registrierter Benutzer

Beiträge: 347

Dabei seit: 3. Februar 2008

Dienstag, 7. September 2010, 14:21

Fehlerhafter Übertrag Textfeld Multiline und Verbundene Excelzelle

Hallo Zusammen,

ich habe die letzten Woche damit verbracht, eine größere Anwendung mit VBA (Basis Excel 2003) zu erstellen.

Derzeit habe ich ein Problem mit Textfeldern.
Die Anwender können über eine Eingabemaske Daten erfassen. Dieser werden verarbeitet und in eine zweite Exceldatei überführt. Da in manchen Feldern z.B. Bemerkungen erfasst werden müssen, kann es durchaus vorkommen, dass mehrere Zeilen benötigt werden.

Deshlab habe ich bei diesen Feldern die Eigenschaft Multiline auf True gesetzt. Aus Layoutgründen, wurde in dem Exceldokument, in das die Inhalte der TExtfelder eingefügt werden, zum Teil Zellen verbunden. Manchmal wurden auch Zeilenhöhen geändert.

Nun möchte ich einen Text, aus einem entsprechenden Texfeld, in das Exceldokument überführen.

Workbook().Sheets().Cells().value = Textfeld.text

Der Text wird auch völlständig eingefügt. Die Zeilenumbrüche werden ebenfalls mit eingefügt (wenn ich die Exceldatei als CSV speichere bzw. mit einen Texteditor öffne, kann ich die Sonderzeichen (Zeilenumbruch) erkennen).

ABER:

Die Zelle passt sich nicht an. Sie bleibt bei Ihrer ursprünglichen Höhe. Der Anwender muss von Hand die Zeilenhöhe anpassen und ggf. die Textausrichtung ändern.

Geht das auch automatisch?, dass die Zeilenhöhe sofort angepasst wird (Wofür soll sonst der Hacken Zeilenumbruch unter Format (2. Reiter) vorhanden sein.

Vielen Dank