ich habe eine Datei (xxxx.dat) die nach Bearbeitung durch ein Makro letztendlich als xxxx.xls (xxxx bleibt) gespeichert werden soll. Es wird zwar eine xls-Datei gespeichert, aber in der Datei sind immer noch die Texttrennzeichen enthalten. Wie muss ich nachfolgenden Code ändern, dass es eine "echte" xls-Datei gibt ? Habe nichts Passendes gefunden.
Danke für Euere Hilfe Peter
verz = "C:\ae\"
ChDir verz
Ext = ".xls"
Dateiname = InputBox("Bitte Dateiname eingeben:", Default:=X_Workbook & Ext)
If Dateiname = "" Then
Application.DisplayAlerts = False
Else
ActiveWorkbook.SaveAs Filename:=verz & Dateiname
MsgBox "Datei gespeichert unter: C:\ae\" & Dateiname
ActiveWorkbook.Close
End If