SaveAs text danach speichern als xl file

ich habe ein Makro, dass ein Excel-Arbeitsblatt als text datei speichert. Wenn ich nach Ausführung des Makros meine gesamte Arbeitsmappe speichern möchte und auf den Speichern Button drücke kommt das dialogfenster speichern als und als Dateiformat ist Text angegeben. Das möchte ich allerdings nicht, weil sonst das Excel Workbook aus Versehen als .txt abgespeichert werden könnte, ich möchte, dass der speicherbutton normal reagiert.
Kann man das Save.As irgendwie manipulieren, dass das nicht passiert? kann man irgend ne variable setzen, die den nächsten Speichervorgang beeinflusst?

vielen dank

Kaiser Bene