GetSaveFileName
13.08.2007 08:27:00
Hans
eine Bitte: Kann mal jemand den nachfolgenden Code in Excel 12/Office 2007 testen:
Sub Speichern()
Dim vFile As Variant
vFile = Application.GetSaveAsFilename("Excel-Datei (*.xls), *.xls")
MsgBox vFile
End Sub
Im Excel-Dialog bitte nur einen Dateinamen ohne Dateiendung angeben.
Ich möchte wissen, ob
a) der Dateifilter funktioniert, also nur die vorhandenen *.xls-Dateien angezeigt werden
b) ob dem Dateinamen ein Punkt angehangen wird.
Ich bedanke mich.
hans