speichern_unter
07.01.2006 07:30:02
Peter
am Freitag habe ich hier aus dem Forum (von Martina am 05.01. vormittags) folgenden Makro bekommen -
Sub speichern_unter
dim s as string
s = Application.GetSaveAsFilename(InitialFileName:=" G:\Pad01\Pfad02\Pfad03\Pfad04\", fileFilter:="Excel-Arbeitsmappe, *.xls")
End Sub
als ich es gestern in Vordrucke einbauen wollte, stellte sich folgendes heraus.
Der Weg zu dem jeweiligen Ordner klappt einwandfrei - nur wenn ich dann einen Namen für die Datei eingebe und auf speichern drücke, wird nichts gespeichert (es kommt keine Fehlermeldung - Pfad nicht erkannt oder Laufzeitfehler).
Es ist nirgendwo etwas unter dem gespeicherten Namen zu finden ?!
Gruß Peter