workbooknamen mit vba in excel speichern

hallo liebe leute
ich habe ein problem in excel

ich moechte mit einem makro ein neues workbook oeffnen und einem bestimmten namen speichern
um an den namen (bzw. pfad) zu kommen nutze ich getsaveasfilename
wenn ich nun speichern will ueberspeichert er immer das workbook aus dem ich das makro gestartet habe - ich will aber das neu geoeffnete abspeichern ???
bitte helft mir - was mache ich falsch

danke schon im voraus

"Z"

 

Speichername festlegen:
Dateiname = Application.GetSaveAsFilename

\'Unter gewähltem Namen Speichern:
Application.ActiveWorkbook.SaveAs (Dateiname)

End Sub

Gruss
Ralph