Speichern unter mit Dateiname aus Zelle ...
28.03.2008 16:00:55
Peter
hatte am Dienstag eine Frage zu Speichern unter mit Dateiname aus Zelle wo ich auch mehrere Antworten bekam bei einer Antwort hatte ich einige Schwierigkeiten mit dem Lesen .
Dafür erst einmal, wenn auch ein etwas verspätetes Danke !
Habe jetzt den Makro soweit "zusammen geschustert" das der Dateiname so im Feld steht wie ich mir das vorgestellt habe, aber ...
Wenn ich die Datei dann Speicher, wird die Datei immer unter Unbekannter Anwendung gespeichert.
Habe schon unter filefilter:= alles mögliche versucht vergeblich
Sub SpeichernUnterDialogAufrufen()
'Application.Dialogs(xlDialogSaveAs).Show
fileSaveName = Application.GetSaveAsFilename(Worksheets("Matrix").Range("I5"), fileFilter:=" _
Text Files (*.xls), *.xls")
If fileSaveName False Then
ActiveWorkbook.SaveAs fileSaveName
End If
End Sub
Gruß Peter
Anzeige