Live-Forum - Die aktuellen Beiträge
Datum
Titel
13.10.2025 19:31:31
VBA Formel mit Bezug auf Überschrift anstatt Spalte
13.10.2025 15:10:17
Überlappende Zeiträume über mehrere Tabellen mit leeren Zell
13.10.2025 13:34:56
PQ Abfrage mit verschiedenen Werten ausführen + Protokoll
13.10.2025 12:24:02
Zählen in Abhängigkeit einer Jahreszahl
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1088to1092
1088to1092
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zelländerung anzeigen

Forumthread: Zelländerung anzeigen

Zelländerung anzeigen
Boernie
Hallo,
ich suche eine funktion, um die letzte Änderung einer Zelle auszulesen. Mein Dokument (im Netzwerk) wurde geändert, und keiner will's gewesen sein. Kann ich hier noch nachvollziehen, wer wann was geändert hat?
Danke schon mal im voraus
Boernie
Anzeige

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

Betreff
Benutzer
Anzeige
AW: Zelländerung anzeigen
16.07.2009 07:37:44
Hajo_Zi
Hallo
Nein, Da mußt Du schon ein Protokoll führen.

AW: Zelländerung anzeigen
16.07.2009 08:33:41
Bernd
Hi Boernie,
schreibe folgenden code in DieseArbeitsmappe:
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Static intSchonGespeichert% 'initialiesiert mit 0
Dim lngZeile As Long
With Worksheets("tab1") 'Tabellennamen anpassen
'nur einen Speichervorgang je Öffnung merken
lngZeile = .Cells(Rows.Count, 1).End(xlUp).Row + intSchonGespeichert + 1
.Cells(lngZeile, 1).Value = Format(Now, "DD.MM.YYYY") 'Datum Spalte A
.Cells(lngZeile, 2).Value = Format(Now, "HH:MM:SS") 'Uhrzeit Spalte B
.Cells(lngZeile, 3).Value = Environ("Username")
End With
intSchonGespeichert = -1
End Sub

So siehst du wer wann um wieviel uhr zuletzt gespeichert hat.
Das Tabellenblatt kannste ja dann per code für die anderen ausblenden oder die schrift weissen und den scrollbereich im Blatt auf A1 beschränken.
gruss Bernd
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige