Zeit automatisch eintragen
Hallo,
ich möchte wenn in zelle b1 irgent etwas eingegeben wird das das in der danebenstehenden zelle a1 mit der uhrzeit dokumentiert wird. bekomme das nicht hin die uhrzeit ändert sich wieder sie ist nicht statisch.
ich habe das forum schon durchgestöbert und auch das passende makro gefunden (http://www.supportnet.de/threads/12740200 ). nun habe ich leider keine ahnung von makros und möchte wissen wie ich das makro in meine tabelle einsetzen kann.
danke im vorraus
dieter
Antwort schreiben
Antwort 1 von Hajo_Zi vom 09.12.2020, 14:09 Options
Hllo Dieter,
Deinen Beitrag konnte ich nicht finden.
Datum bei Eingabe im Beispiel mußt Du date nur durch Time ersetzen.
Gruß Hajo
Antwort 2 von dieter2000 vom 09.12.2020, 14:29 Options
hallo hajo,
das ist genau das was ich suche, wenn du mir noch sagst wo ich date durch time ersetzen muss, läuft die zeit weiter oder bleibt sie stehen?
mfg dieter
Antwort 3 von Hajo_Zi vom 09.12.2020, 14:37 Options
Hallo Dieter,
die Zeit ändert sich nur bei neuer Eingabe.
starte den VBA Editor (Alt+F11), Bild sollte zweigeteilt sein ansonsten Strg+R, gehe auf Deine Datei, mache ein Doppelklick auf die Tabelle und Du siehst rechts den Code.
Gruß Hajo
Antwort 4 von dieter2000 vom 09.12.2020, 14:44 Options
hallo hayo
danke für deine schnelle antwort genau das habe ich gesucht.
danke nochmal
gruß dieter
Antwort 5 von dieter2000 vom 09.12.2020, 15:00 Options
hallo hayo
eine frage zu deinem makro habe ich noch:
gibt es eine möglichkeit das das makro nur auf bistimmte tabellenblätter in dieser tabelle funktionieren? das bestimmte blätter ausgenommen sind.
gruß dieter
Antwort 6 von Hajo_Zi vom 09.12.2020, 15:07 Options
ahllo Dieter,
der Code wirkt nur in der Tabelle unter der der Code ist.
Gruß Hajo
Antwort 7 von dieter2000 vom 09.12.2020, 15:44 Options
hallo hayo,
aber dort auch für jedes tabellen blatt oder kann man einige blätter ausschliessen.
gruss dieter
Antwort 8 von Hajo_Zi vom 09.12.2020, 16:00 Options
Hallo Dieter,
das verstehen ich nicht. in der Tabelle gibt es doch nur eine Tabelle von A1 bis XFS1.048.576.
Der Bereich wo der code wirken soll ist doch im Code festgelegt bei Set RaBereich = Range("A5:A40, C5:C40, F5:F40, J5:J40")
Gruß Hajo
Antwort 9 von dieter2000 vom 09.12.2020, 17:02 Options
hallo, hajo
wenn ich dich richtig verstehe muß ich für jedes tabellenblatt dieses makro einfügen oder?
gruß dieter
Antwort 10 von Hajo_Zi vom 09.12.2020, 18:38 Options
Halo Dieter,
falls in jeder Tabelle ein andere Bereich dann ja ansonsten im VBA Editor unter DieseArbeitsmappe unter Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
Gruß Hajo
Antwort 11 von dieter2000 vom 10.12.2020, 10:37 Options
Hallo hajo,
das funktioniert prima,
ich muss die zeit allerdings links neben der eingabezelle haben und nicht rechts, im vba bin ich nicht so recht bewandert. ich kann in dem makro nicht sehen wie ich das ändern könnte. vieleicht kannst du mir ja nochmal helfen.
danke nochmal für das makro
gruß dieter
Antwort 12 von Hajo_Zi vom 10.12.2020, 10:39 Options
Hallo Dieter,
da steht irgendwo Offset(0,1) ändere das in Offset(0,-1)
Gruß Hajo
Antwort 13 von dieter2000 vom 10.12.2020, 10:47 Options
hallo hajo,
das haut prima hin genauso wie ich das haben wollte.
meinen allerherzlichsten dank nochmal.
ich wünsche dir und deinen angehörigen
ein frohes fets und einen guten rutsch ins neue jahr.
gruß dieter
Antwort 14 von Hajo_Zi vom 10.12.2020, 10:56 Options
Hallo Dieter,
ich wünsche Dir das auzch und hoffe mal, dass das neue Jahr besser anfängt als dieses geendet hat.
Gruß Hajo