VBA jetzigen Zeitwert in eine Zelle schreiben

Bild

Betrifft: VBA jetzigen Zeitwert in eine Zelle schreiben
von: udo
Geschrieben am: 04.11.2003 15:56:50

Hallo Freunde,

könnt ihr mir bitte ganz kurz auf die Sprünge helfen.
Brauch die VBA Anweisung, die mir in die Zelle A1
den aktuellen Zeitwert einträgt.

Aber bitte nicht als Formel, sóndern als Wert.

Mit folgendem VBA schreibt er mir nämlich die Formel rein,
das is nicht korrekt für meine Tabelle, ich brauch dann nur
den Wert an sich drinne stehn.

zB. 02.11.03 ( die Formatierung der Zelle lässt mir dann ja die
Möglichkeit, ob ich diesen Zahlenwert mir auch mit Uhrzeit anzeigen lassen
möchte usw. )

Also bitte nur VBA für jetztigen Zeitwert, zum Zeitpunkt des Eintrages in A1.

Cells(ActiveCell.Row, 1).Activate
ActiveCell.FormulaR1C1 = "=NOW()"


Gruß und Danke schon mal im Voraus,

udo

Bild


Betrifft: AW: VBA jetzigen Zeitwert in eine Zelle schreiben
von: Andi_H
Geschrieben am: 04.11.2003 15:58:55

Hi Udo,

versuchs mal so:
Cells(1,1) = Date 'Datum
cells(1,1) = Now ' Datum + Zeit

gruß
andi


Bild


Betrifft: Super , passt perfekt , Vielen Dank euch beiden oT
von: udo
Geschrieben am: 04.11.2003 16:02:57

...


Bild


Betrifft: AW: VBA jetzigen Zeitwert in eine Zelle schreiben
von: Russi
Geschrieben am: 04.11.2003 15:59:32

ActiveCell.Range = Date

oder

ActiveCell.Range = Now

Wie Du willst.

Viele Grüße

Russi


Bild

Beiträge aus den Excel-Beispielen zum Thema " VBA jetzigen Zeitwert in eine Zelle schreiben"