Textdatei erhält immer einen Zeilenumbruch

  • Excel

Es gibt 2 Antworten in diesem Thema. Der letzte Beitrag () ist von apple987123.

    Textdatei erhält immer einen Zeilenumbruch

    Hi Leute, wenn ich eine Textdatei mit folgendem Code erstellen will:

    Visual Basic-Quellcode

    1. Open "C:\Test.txt" For Output As #1
    2. Print #1, "#Titel"
    3. Print #1, "#AAA" + vbTab + "BBB" + vbTab + "Aktualisierungsdatum"
    4. For lngZeile = 4 To hourTableLength - 1
    5. 'hourTableLength = 192
    6. myText = Tabelle1.Cells(lngZeile, 1).Value & vbTab & Tabelle1.Cells(lngZeile, 3).Value & vbTab & Tabelle1.Cells(lngZeile, 8).Value
    7. Print #1, myText
    8. myText = ""
    9. Next lngZeile
    10. Print #1, "#Titel2"
    11. Print #1, "#CCC" + vbTab + "DDD" + vbTab + "Aktualisierungsdatum"
    12. For lngZeile = 4 To switchesTableLength - 1
    13. 'switchTableLenght = 68
    14. myText = Tabelle2.Cells(lngZeile, 1).Value & vbTab & Tabelle2.Cells(lngZeile, 3).Value & vbTab & Tabelle2.Cells(lngZeile, 4).Value
    15. Print #1, myText
    16. myText = ""
    17. Next lngZeile
    18. Close #1


    Hat das erstellte Textfile am ende immer noch einen Zeilenumbruch, der darf da aber auf keinen Fall sein... nur leider sehe ich das Problem nicht.

    Hoffe auf Hilfe
    Apple987123

    Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „apple987123“ ()