Ändern Sie das Speicherdateiformat in VBA

Ich habe die folgende Frage gelesen: Kann ich eine Tabelle basierend auf einer Spalte in Excel 2007 in mehrere Dateien aufteilen?

Ich habe eine Frage zu "Im selben Format wie die ursprüngliche Arbeitsmappe speichern", bei der Sie mir hoffentlich helfen können.

Ich verwende das Makro mit einer CSV-Datei, möchte aber die endgültigen Dateien wie XLS haben.

Wie kann das Makro geändert werden, um es in diesem Format zu speichern (anders als das ursprüngliche)?

microsoft-excel vba macros

— Samuel
quelle

Das Makro wird in die Arbeitsmappe eingefügt. Das native Format dafür ist xls (oder xlsm), das Sie aus einer CSV-Datei verwenden, ändert nicht den Dateityp der Arbeitsmappe, in der Sie sich befinden.

— Jon Carlstedt

Hier ist ein typisches Beispiel:

Sub Sample_Cvs_To_Xlsx()
    ChDir "C:\TestFolder"
    Workbooks.Open Filename:="C:\TestFolder\WhatEver.csv"
    '
    ' perform processing
    '
    ActiveWorkbook.SaveAs Filename:="C:\TestFolder\WhatEver.xlsx", FileFormat:= _
        xlOpenXMLWorkbook, CreateBackup:=False
    ActiveWorkbook.Close
End Sub

— Garys Schüler
quelle