wieder trifft mich das Problem des Umstiegs von Office 2003 auf Office 2007.
Das bis Office 2003 funktionierende Makro gibt neuerdings kein Semikolon als Trennzeichen aus.
Lässt sich das irgendwie beheben?
Ich danke für eure Unterstützung.
John
Das bis Excel 2003 funktionierende Makro ist wie folgt:
Sub TabelleAlsDateiAusgeben()
' TabelleAlsDateiAusgeben Makro
zähler = 1
Sheets(zähler).Select
For Blatt = 1 To Sheets.Count
Sheets(zähler).Select
Dateiname = (ActiveWorkbook.Path & "\" & ActiveSheet.Name)
Sheets(zähler).Copy
ActiveWorkbook.SaveAs Filename:=(Dateiname & ".csv"), _
FileFormat:=xlCSV, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False, local:=True
ActiveWindow.Close
zähler = zähler + 1
Next Blatt
Sheets(1).Select
End Sub