Dim dn As String
dn = DateiNam & " " & _
Format(ActiveSheet.Cells(2, 16).Value, "mmm yy") _
& " vom " & Format(Date, "DD.MM.YYYY") _
& " " & Format(ActiveSheet.Cells(8, 17).Value) & ".xls"
jetzt möcht ich allerdings das das Datum so bleibt wie es ist, wie kann ich dies ändern?
Habe schon die Zeile gelöscht: & " vom " & Format(Date, "DD.MM.YYYY") _
allerdings wird jetzt nicht unter dem alten Datum gespeichert, steht kein Datum drin.
gr Kurt P