Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.11.2023 15:32:06
Anzeige
Anzeige
HERBERS
Excel-Forum
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
988to992
988to992
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Dateneingabe mit Datum+Uhrzeit vervollständigen

Dateneingabe mit Datum+Uhrzeit vervollständigen
08.07.2008 15:56:00
KlausF
Hallo Excellenzen!
Habe eine Datenbank mit 20 Spalten, in der mittels der excelinternen Daten-Maske eintragungen vorgenommen bzw. geändert werden.
Nun möchte ich, dass automatisch in der 21.Spalte das Datum und in der 22.Spalte die Uhrzeit mitprotokolliert wird.
Mein kläglicher Ansatz funzt da leider nicht:

Private Sub Worksheet_Change(ByVal Target As Range)
Cells(Target.Row, 21).Value = Format(Date, "dd.mm.yyyy")
Cells(Target.Row, 22).Value = Format(Now, "hh:mm:ss")
End Sub


Was muss daran geändert werden?
Grüße!
Klaus

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Dateneingabe mit Datum+Uhrzeit vervollständigen
08.07.2008 16:01:00
Tino
Hallo,
ich sehe so keinen Fehler, nur dass du eine Art Endlosschleife erzeugst.

Application.EnableEvents = False
Cells(Target.Row, 21).Value = Format(Date, "dd.mm.yyyy")
Cells(Target.Row, 22).Value = Format(Now, "hh:mm:ss")
Application.EnableEvents = True


Gruß Tino

www.VBA-Excel.de


AW: Dateneingabe mit Datum+Uhrzeit vervollständigen
08.07.2008 16:29:50
KlausF
Hallo Tino,
Danke für Deine Hilfe zur Behebung der Endlosschleife!
Das Hauptprob ist aber: eine Eingabe über die Datenbank-Maske wird nicht als Change-Ereignis erkannt - das Makro trägt nix ein, nur bei manueller Direkteinageb in die DB!
Hier mal eine Demo-Datei:
https://www.herber.de/bbs/user/53662.xls
Wie kann man das lösen?
Grüße!
Klaus

Anzeige
AW: Dateneingabe mit Datum+Uhrzeit vervollständigen
08.07.2008 17:14:48
Tino
Hallo,
und was soll ich jetzt mit dieser Demo Datei machen?
Da ist keine Datenbank-Maske drin!
Wie soll ich dies Nachvollziehen?
Gruß Tino

www.VBA-Excel.de


AW: Dateneingabe mit Datum+Uhrzeit vervollständigen
08.07.2008 17:35:37
KlausF
Sorry Tino,
ich meinte mit Datenbank-Maske die excelinterne, unter dem Menü Daten/Maske verfügbare!
Und die Datei war nur zur Demo, dass bei Verwendung ebendieser Maske das Makro nicht "anspringt".
Gruß!
Klaus

AW: Dateneingabe mit Datum+Uhrzeit vervollständigen
08.07.2008 18:08:08
Tino
Hallo,
darauf scheint es kein Ereignis zu geben, dass darauf anspricht.
Wirst wohl eine alternative suchen müssen.
Ich lass die Frage mal offen, vielleicht irre ich mich auch!
Gruß Tino

Anzeige
AW: Dateneingabe mit Datum+Uhrzeit vervollständigen
12.07.2008 11:05:00
Mustafa
Hallo Klaus,
Bei der Eingabe der Daten über die Datenmaske spricht nicht das Change Ereignis an, aber das Calculate ereignis.
Versuch es mal mit diesem Code:

Private Sub Worksheet_Calculate()
Application.EnableEvents = False
Cells(Target.Row, 6).Value = Format(Date, "dd.mm.yyyy")
Cells(Target.Row, 7).Value = Format(Now, "hh:mm:ss")
Application.EnableEvents = True
End Sub


Rückmeldung obs Hilft wäre nett.
Viele Grüße aus der Domstadt Klön.

Sorry nehme alles zurück
12.07.2008 11:08:00
Mustafa
So funktioniert es auch nicht.

300 Forumthreads zu ähnlichen Themen


Hallo zusammen, ich habe ein Problem mit einer Tabelle.
Ich habe eine Spalte in der die Geburtstagen eingetragen sind.
Ich möchte nun für bestimmte Jahrgäne eine bestimmte Anzahl von Jahren hinzufügen.
Z.B.: Jahrgang 1952 plus 65 Jahre, 1953 plus 65 Jahr und 2 Monate, Jahrgang 1962...

Hallo, würde mich freuen, wenn mir jemand bei meinem Problem helfen kann: ich habe ein Anfangs- (20.09.2008) und ein Enddatum (12.12.2008) und möchte die Differenz berechnen. Dazu muss ich jeden Monat einzeln dargestellt haben - der angebrochene September und der angebrochene Dezember ergeben d...

Hi zusammen,
brauch hierbei Hilfe. Und zwar moechte ich gerne wissen, wie ich ein Datum in Kalenderwoche plus Jahreszahl umwandeln kann. Datum in Kalenderwoche ist ja kein Thema. Ich mache das mit dem Analysis ToolPak. Formel: =WEEKNUM(A1,2) Leider reicht mir aber die Wochenzahl nicht aus....

Hi,
ich versuche mir einen Geburtstagskalender zu bauen. Dabei habe ich Probleme mit der Sortierung des Geburtsdatums, da das Geburtsjahr bei der Sortierung nicht berücksichtigt werden soll. Wenn ich die Geburtstage sortiere dann sieht das immer so aus :
30.04.1964 Andreas Müller
22...

Hallo,
in einer Zelle steht ein Datum. In der Spalte daneben soll ein Datum stehen, das zwei Werktage weiter ist.
Wie ist die Formel?
Gruss
Rebecca

Hallo
Ich habe folgende Siutation:
in der Zelle A1 habe ich ein Datum. In der Zelle B1 möchte ich dieses Datum wie folgt ausgeben: gültig per TT.MM.JJJ
Ich verwende dazu die Funktion =verketten() und füge das Datum als Text an.
Wenn ich nun zwischen deutschen und französischen E...

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige