Wie kann ich abspeichern ?
25.06.2007 11:29:45
Walter
habe folgende Zeilen im Speicherungsmakro:
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"
die Speicherung läuft soweit i.o. .
Wenn ich allerdings die Speicherung nochmals durchführe, habe die gleichen Zeilen allerdings
ohne:
Format(ActiveSheet.Cells(8, 17).Value) wird mein Hinweis z.b. C 00 nicht mehr gespeichert,
Wie kann ich das einbinden, das der gespeicherte Wert z.b. C 00 bleibt ?
So steht das in einem anderen Makro für ein anderes Verzeichnis:
Dim dn As String
dn = DateiNam & " " & _
Format(ActiveSheet.Cells(2, 16).Value, "mmm yy") _
& " vom " & Format(Date, "DD.MM.YYYY") & ".xls"
gruß Walter K