VBA Excel in CSV Datei umwandeln

  • Excel

Es gibt 1 Antwort in diesem Thema. Der letzte Beitrag () ist von VaporiZed.

    VBA Excel in CSV Datei umwandeln

    Hi alle zusammen,

    Ich versuche gerade in einer Exel Vorlage das Tabellenblatt 3 in eine neue CSV Datei im gleichen Ordner zu speichern. Das ist mein Ansatz:


    Dim newname As String

    newname = ThisWorkbook.Path & "Text" & Format(Date, "DDMMYYYY")
    ActiveSheet.Copy
    ActiveWoorkbook.SaveAs Filename:= newname, FileFormat:=xlCSV
    ActiveWoorkbook.Close False


    Das Ganze speichert jetzt jedoch die Datei in einem Ordner davor. Und wenn ich die CSV Datei öffne, ist eine Zeile immer in einer Zelle angezeigt. Hat da jemand Ideen oder Tipps?

    Danke im Voraus!

    Willkommen im Forum.

    ThisWorkbook.Path & "Text" Da fehlt ein \ vor dem Text -> "\Text", sonst kommt z.B. raus: D:\DatenText29042020.csv statt D:\Daten\Text29042020.csv

    btw: bitte CodeTags verwenden

    ##########

    Das mit eine Zeile in einer Zelle: ja klar, was hast Du denn erwartet? Das liegt daran, dass Du COMMA-Separated Values (CSV) hast. Du brauchst aber Semikolons/Semikola, damit Excel das wie gewünscht verarbeitet. Das geht bei mir mit:

    Visual Basic-Quellcode

    1. ActiveWorkbook.SaveAs Filename:= newname, FileFormat:=xlCSV, Local:=True


    ach ja: ActiveWorkbook, nicht ActiveWoorkbook
    Dieser Beitrag wurde bereits 5 mal editiert, zuletzt von „VaporiZed“, mal wieder aus Grammatikgründen.

    Aufgrund spontaner Selbsteintrübung sind all meine Glaskugeln beim Hersteller. Lasst mich daher bitte nicht den Spekulatiusbackmodus wechseln.

    Dieser Beitrag wurde bereits 3 mal editiert, zuletzt von „VaporiZed“ ()

Facebook
Telefonspende