Office: Aktuelles Datum

Hallo zusammen,

ich würde gerne in einer Userform in einer Listbox das aktuelle datum wiedergeben.

Dies soll passieren, wenn ich eine bestimmt aktion ausführe bzw. die Userform sich öffnet.

Leider schlagen alle Versuche fehl...

kann mir wer weiterhelfen???
Code:

:)

 

Hi,

kann nicht funktionieren ,da Date eine von Excel benanntes Schlüsselwort für das aktuelle Datum ist..
...genau wie Now das Datum mit der Uhrzeit wiedergibt.

versuch es so :
Code ins Modul der UF

was ich mich jedoch frage, ist die Sinnhaftigkeit das Datum in eine Listbox einzutragen ,
wenn diese Daten nach dem schließen der UF (außer im Hide Modus) bzw beim schließen der Mappe flöten gehen ?!

Aber das stand ja auch nicht zur Debatte *wink.gif*

 

Wenn ich das Datum in der Userform habe, werden bevor die UF verlassen wird alle eingetragenen Daten in Access abgespeichert. Sie würden also nicht verloren gehen....

hatte mich beim Code auch verschrieben.

das sollte

Code:

heißen, geht allerdings auch nicht.

soll ich den oben genannten code ins Modul der UF schreiben oder soll ich nur den von dir daunter genannten Quellcode in die Listbox&userform_activate schreiben?

weil wenn ich den code nur an die von dir beschriebe Stelle schreibe, bekomme ich immer noch kein datum angezeigt.

 

Hallo
Hast Du schon Steffens Code probiert??
Wenn's dein Code sein soll, dann so:
Code:

gruss hary

 

Den Code hab ich genauso, weiß nur nicht genau an welche Stelle ich diesen schreiben soll.

Ich hab den jetzt in

Code:

Private Sub ListBoxPersonr_Click()
Dim datum As Date
datum = Now()
ListboxDatum.AddItem Format(datum, "TT.MM.JJJJ")
[/datum]

und er übernimmt das Datum einfach nicht.

 

Hi Julia,

in diesem Forum ist es üblich eine Anfrage/Antwort mit einer Begrüßung zu beginnen und mit einem Gruß zu beenden .
So erscheint die ganze Kommunikation schon viel freundlicher und die Chance auf Hilfe erhöht sich ungemein...

anbei ein Bsp wie du dein Datum in die Listbox bekommst,je nachdem wie die Datumswerte eingetragen werden sollen.

1. über ein CommButton auf dem Arbeitsblatt
2. über ein CommButtion in der UF

 

Hallo Steffen, hallo Hary,

vielen Dank für eure Hilfe, das Programm funktioniert jetzt.

Gruß
Julia