Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.04.2024 18:57:33
17.04.2024 16:56:58
Anzeige
Archiv - Navigation
1476to1480
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
Inhaltsverzeichnis

Zeit beim Speichern in Zelle schreiben.

Zeit beim Speichern in Zelle schreiben.
18.02.2016 20:22:00
phil
Servus.
Erst mal Danke im Voraus fürs durchlesen sofern eine Antwort kommt.
Und natürlich auch vielen Dank sofern jemand bereit ist mir zu helfen.
Also wir haben eine Checkliste gebaut bei der wir werte eintragen müssen beim Rundgang
Also ich habe ein Rundgangs Protokoll gebaut dass das Datum anzeigt.
Sobald das .xltm geöffnet wird steht in einer Spalte das Aktuelle Datum.
=Heute()
Ist ja auch langweilig bis hier hin.
Aber die Anforderung soll sein, dass in der nächsten Spalte, sagen wir mal bei B2 die Uhrzeit drin steht, wenn das Protokoll fertig ist und gespeichert wird.
Es geht darum das wir täglich die Rundgänge machen müssen und laut meinem Kollegen es sinnvoll wäre, wenn da irgendwo ne Uhrzeit steht, zu welcher Zeit man kontrolliert hat.
Deswegen kommt vermutlich auch die idee dass die Zeit erst beim speichern aktualisiert und gespeichert wird.
Sicher kann man das auch von Hand eintragen, aber automatisiert wäre es zumindest idiotensicher.
Ich hab mich heute schon durch Foren gewühlt aber nichts brauchbares Gefunden.
Versucht ein Macro zu schreiben aber da bin ich einfach nicht gut genug für.
Und dass =Jetzt() nicht im Ansatz funktionieren kann, brauch ich glaube ich nicht sagen.
Wäre sehr dankbar wenn jemand mir da ein Tipp hat
Grüße

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zeit beim Speichern in Zelle schreiben.
18.02.2016 20:36:00
Werner
Hallo Phil,
folgenden Code ins Code-Modul von diese Arbeitsmappe - Makro-Editor mit Alt F11 öffnen - Doppelklick auf diese Arbeitsmappe - Code ins Code-Fenster rechts reinkopieren
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Sheets("Tabelle1").Range("A1") = Now() 'Tabellenblatt und Zelle an deine Bedürfnisse anpassen
End Sub
Datum und Zeit wird beim Speichern in Tabelle1 Zelle A1 eingetragen. Wenn du dort nur die Zeit haben willst, dann musst du die Zelle nur entsprechend formatieren.
Gruß Werner

Anzeige
AW: Zeit beim Speichern in Zelle schreiben.
18.02.2016 20:56:53
phil
Vielen Lieben Dank Werner!
Ich werde es morgen mal versuchen.
Ich liebe dieses Internet!
Einen lieben Gruß und nen schönen Abend!
Gruß
Phil

AW: Zeit beim Speichern in Zelle schreiben.
19.02.2016 10:57:37
phil
Servus.
Dein Code funktioniert.
Nur musste ich den Schreibschutz an der Stelle raus nehmen.
Das hatte ich vergessen zu erwähnen dass das Blatt am ende geschützt wird.
Klar kann der Code an der Stelle nichts mehr schreiben.
Wenn du noch weißt wie man das ändern kann, bin ich gerne offen.
Aber ist an der Stelle nicht so tragisch denke ich.
Aber bis hier hin erst mal vielen Lieben Dank!
Grüße
Phil

Anzeige
AW: Zeit beim Speichern in Zelle schreiben.
19.02.2016 12:52:40
Werner
Hallo Phil,
dann so
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Sheets("Tabelle1").Unprotect Password:="Passwortname"
Sheets("Tabelle1").Range("A1") = Now() 'Tabellenblatt und Zelle an deine Bedürfnisse anpassen
Sheets("Tabelle1").Protect Password:="Passwortname"
End Sub
Gruß Werner

324 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige