Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 10:59:29
Datei Auswählen und öffnen
19.04.2024 10:46:47
Bestimmte Zellen aus dynamischer Liste zurückgeben
19.04.2024 10:39:36
Schaltfläche auf einem Tabellenblatt NICHT mit abspeichern
19.04.2024 09:26:26
Median für Zeilen mit gleichen Zeitstempel
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1080to1084
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1080to1084
1080to1084
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Speicher Datum und Autor im Sheet anzeigen

Speicher Datum und Autor im Sheet anzeigen
22.06.2009 12:15:30
Sabine
Hallo zusammmen,
ich möchte auf dem ersten Blatt meiner Excel Datei schriftlich hinterlegen, wer, wann das letzte Mal die Datei gespeichert hat.
Wie geht das automatisch?
Kann mir jemand helfen? Bitte so erklären, dass es ein Dummy wie ich versteht...;-))
Gruß,
Sabine

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Speicher Datum und Autor im Sheet anzeigen
22.06.2009 12:19:36
Hajo_Zi
Haloo Sabine,

Option Explicit
Dim LoLetzte As Long
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
With Worksheets("Tabelle3")
LoLetzte = IIf(IsEmpty(.Cells(.Rows.Count, 1)), .Cells(Rows.Count, 1).End(xlUp).Row, . _
Rows.Count) + 1
.Cells(LoLetzte, 1) = Now
.Cells(LoLetzte, 2) = Environ("Username")
End With
End Sub
Private Sub Workbook_Open()
Dim LoI As Long
Dim LoJ As Long
Dim StMeldung As String
With Worksheets("Tabelle3")
LoLetzte = IIf(IsEmpty(.Cells(.Rows.Count, 1)), .Cells(Rows.Count, 1).End(xlUp).Row, . _
Rows.Count) + 1
If LoLetzte > 10 Then LoJ = LoLetzte - 11
For LoI = LoJ + 1 To LoLetzte
StMeldung = StMeldung & .Cells(LoI, 1).Text & " " & .Cells(LoI, 2) & Chr(13)
Next LoI
MsgBox StMeldung
End With
End Sub


Open kannst Du entfallen lassen falls es beim öffnen nicht angezeigt werden soll.

Anzeige
AW: Speicher Datum und Autor im Sheet anzeigen
22.06.2009 12:38:42
Sabine
ich kenne mich damit leider überhaupt nicht aus. ich habe es jetzt in den editor eingefügt, aber es passiert nichts...was muss ich tun?
AW: Speicher Datum und Autor im Sheet anzeigen
22.06.2009 13:16:38
Hajo_Zi
Hallo Sabine,
starte den VBA Editor (Alt+F11), Bild sollte zweigeteilt sein ansonsten Strg+R, gehe auf Deine Datei, Doppelklick auf DieseArbeitsmappe und Code ins rechte Fenster einfügen. Tabelle anpassen.
Gruß Hajo

290 Forumthreads zu ähnlichen Themen

Wochentag und Datum
klausk

Guten Morgen,
in eine Zelle soll der Wochentag (Mo, Di.etc.) sowie das "dazu gehörende" Datum.
Beispiel in A1: Frei. - 21.11.2008
Das ganze Konstrukt soll auch kopierbar sein. Wie kann ich mit der Funktion Wochentag das Datum in der gleichen Zelle ansprechen ?
Vielen Dank und li...
21.11.2008 08:05:00
Thread-ID: 1026591
3 Beiträge
Anzeige
Datum mit Zahl addieren ohne Sams-/Sonntag
Alwar

Guten tag liebe Community
zu meinem Problem, ich habe ein Anfangsdatum und die Information wieviele Schichten ich brauche um etwas bestimmtes zu produzieren. Das Problem ich will das Excel automatisch auf das Anfangsdatum drauf rechnet d.h.
z.B.
A1 =Anfangsdatum..B1 =Schicht..........
01.04.2009 09:18:21
Thread-ID: 1065818
18 Beiträge
Differenz Datum in Jahren und Tagen
MiraCeti

Hallo Zusammen!
Vielleicht habe ich ja einen Denkfehler, aber:
Ich bilde die Differenz von zwei Datum und wenn ich das nochmal nachrechne, meine ich, dass immer ein Tag fehlt:
15.02.2008 - 02.05.2010 2 Jahre 77 Tage
14.01.2000 - 30.03.2004 4 Jahre 76 Tage
16.01.2000...
29.04.2009 16:16:18
Thread-ID: 1071946
8 Beiträge
Anzeige
Kalender mit Datum und Wochentag
bartl

hi,ich hoffe ihr könnt mir helfen,
ich brauche einen kalender,in dem folgende spalten vorhanden sind:
1.spalte:datum(sollte vom 08.09.09 bis 31.06.09 gehen)
2.spalte:wochentag
da gibt es bestimmt formeln,die das automatisch berechnen,oder?
ich habe leider mit excel keine ahn...
30.08.2009 22:06:44
Thread-ID: 1099493
3 Beiträge
automatische Tag- und Datumsangabe
Elmar

Hallo zusammen,
vielleicht kann mir jemand bei meinem Problem helfen, denn in der Onlinesuche habe ich nicht das gefunden, was mir hilft bzw. ich bin vrmutlich nicht so gut in Excel, dass ich was umbauen könnte.
Ich habe eine Tabelle, in der steht in Zelle H3 der aktuelle Monat drin (z....
17.10.2009 11:57:22
Thread-ID: 1110272
10 Beiträge
automatische Tag- und Datumsangabe
Elmar

Hallo zusammen,
vielleicht kann mir jemand bei meinem Problem helfen, denn in der Onlinesuche habe ich nicht das gefunden, was mir hilft bzw. ich bin vrmutlich nicht so gut in Excel, dass ich was umbauen könnte.
Ich habe eine Tabelle, in der steht in Zelle H3 der aktuelle Monat drin (z....
17.10.2009 11:34:21
Thread-ID: 1110278
3 Beiträge
Einzelne Wochentage aus Zellen mit Datum zählen
Karli

Hallo,
ich habe, um die Anzahl der einzelnen Wochentage in einer Spalte mit Datumangaben zu ermitteln, die Daten in einer anderen Spalte in Text umgewandelt, und dann Montage, Dienstage usw. gezählt.
Gibt es dafür auch einen direkten Weg die Summe bzw. Anzahl der einzelnen Wochentage in...
14.12.2009 21:03:03
Thread-ID: 1123898
6 Beiträge
Tarifzuordnung nach Datum und Tagen | Herbers Excel-Forum
Hans Werner
Hallo,
Ich habe in der Beispieldatei https://www.herber.de/bbs/user/67634.xls ein Problem mit der Zuordnung eines Tarifs, wenn die Tage bzw. das Datum für den entsprechenden Tarif vorgegeben sind.
In der oberen Tabelle sind die entsprechenden Tarifdaten vorgegeben.
In den Zellen J7 bi...
29.01.2010 20:51:10
Thread-ID: 1134286
5 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
2
9
17
7
11
2
9
2
5
4
5
4
3
2
11
6
2
2
1
1
4
6
2
3
15