Speicherproblem mit Excel als CSV-Datei (Datumsfeld)

Hallo ,

Ich müsste euch mal wieder etwas fragen :-P und zwar muss ich eine Exceldatei mit einem Datumsfeld als CSV Datei speichern.
Das klappt alles wunderbar nur wenn ich die Datei mit dem Editor öffne erkennt man das es mit "/" abgespeichert ist. D.h beim Editor wird das Datum als 12/05/2015 abgespeichert.

Meine Frage an euch ist jetzt, ob man das auch so abspeichern kann das es im Editor als 12.05.2015 angezeigt wird. Dies wäre sehr wichtig für die spätere Verarbeitung!

Danke im vorraus für jede Hilfe

Mit freundlichen Grüßen,
Gast2015

Sub Makro1()
'  
' Makro1 Makro  
'  

'  
    Sheets("XX").Select  
    Range("A1").Select  
Dim zeller As Range
a:
For Each zeller In Range("F2", "F999")  
If zeller.Value = "0" Then  
zeller.EntireRow.Delete
GoTo a
End If
Next zeller
    Cells.Select
    ChDir _
        "G:\XX\XX\XX\XX"  
    ActiveWorkbook.SaveAs Filename:= _
        "G:\XX\XX\XX\XX\XX.csv" _  
        , FileFormat:=xlCSVMSDOS, CreateBackup:=False
    Sheets("Eingabe").Select  
    Range("A1").Select  
End Sub

ActiveWorkbook.SaveAs Filename:="G:\XX\XX\XX\XX\XX.csv", FileFormat:=xlCSVMSDOS, CreateBackup:=False, Local:=True