hi zusammen
neue frage:
geht es das man nach der auswahl speichern unter automatisch das datum als tabellenname bekommen kann??
danke für infos
MrTom
Hi MrTom,
Du kannst in der Standardarbeitsmappe (Mappe.xlt im Verzeichnis /XlStart (ggf. in Hilfe nachschauen)) zum Beispiel folgende Sub einfügen:
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Application.Dialogs(xlDialogSaveAs).Show Replace(Date, „/“, „.“) & „.xls“
End Sub
Die fängt Speicherereignisse ab und zeigt selbst das SpeicherUnter-Dialogfeld mit dem aktuellen Datum als Dateinamen an. Leider wird nach dem Speichern das Dialogfeld nochmals angezeigt (diesmal von Excel). Auch ein Cancel = True in der Sub hilft nicht weiter. Da musst Du noch einwenig rumspielen, oder den 2. Dialog mit Abbrechen wegklicken.
Gruß
Sculpture
super danke (owT)
…