Anzeige
Archiv - Navigation
868to872
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
868to872
868to872
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Datei mit Datum & Uhrzeit speichern

Datei mit Datum & Uhrzeit speichern
14.05.2007 08:04:00
Heinz
Guten morgen, im Forum
Habe unteren Code Von Herber CD
Es sollte beim beenden der Arbeitsmappe,zusätzlich zum Dateiname das Datum & Uhrzeit mit speichern.
Damit ich sehe wenn die Datei das letzte mal Geschlossen wurde.
Z.B. " Test - 24.05.2007 - 09:53 "
Eventuell die alte Datei überschreiben.
Habe im Sheets "Schichtplan GK" in A4 = JETZT() als Datum und Uhrzeit formatiert.
Könnte mir bitte jemand weiterhelfen.
Gruß Heinz

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim iRow As Integer
With Worksheets("Schichtplan GK")
iRow = .Cells(Rows.Count, 1).End(xlUp).Row + 1
.Cells(iRow, 1) = Date
.Cells(iRow, 1) = Time
End With
On Error GoTo ERRORHANDLER
ThisWorkbook.Save
Exit Sub
ERRORHANDLER:
MsgBox "Die Datei konnte nicht gespeichert werden!"
End Sub


2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Datei mit Datum & Uhrzeit speichern
14.05.2007 08:46:00
yogi
Moin Heinz
":" im Namen geht leider nicht, daher:
Dim zeit As String
zeit = Date & " " & Hour(Now) & "." & Minute(Now)
ThisWorkbook.SaveAs "c:\temp\test " & zeit & ".xls"
Gruss yogi

AW: Datei mit Datum & Uhrzeit speichern
14.05.2007 09:30:30
Heinz
Hallo Yogi
Recht herzlichen Dank,für Deine Hilfe.
Funkt.Super
Gruß Heinz
Anzeige

305 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige