folgende Frage: Ich würde gerne ein einfaches Speichermakro laufen lassen. In Excel 2003 ist das auch kein Problem. Nun will ich das in Excel 2010 speichern und standardmäßig ist es im Speicherdialog so eingestellt, dass er die Datei als "Excelarbeitsmappe" speichern will (dies entspricht dem .xlsx Format)
Ich will aber nun die Datei weiterhin als 97-2003 Datei speichern.
Wie spreche ich diese Funktion an, dass er standardmäßig dieses Format auswählt?
Bisher sieht mein Code so aus. Wo müsste ich da was ändern?
Sub Speicher()
Dim Datei As String
Dim Pfad As String
Pfad = Worksheets("Prg").Range("A19")
Datei = Worksheets("Prg").Range("D19")
Set Dialog = Application.FileDialog(msoFileDialogSaveAs)
With Dialog
.InitialFileName = Pfad & Datei
.Show
End With
If Dialog False Then Dialog.Execute
End Sub
Ich hoffe, jemand kann mir hier weiterhelfen.Vielen Dank
Gruß Jonatan