Seite 1 von 1

Tagesdatum

Verfasst: Mi, 30.05.2007 12:09
von nixdorf
Hallo,

wie kann ich mit Calc das aktuelle Tagesdatum in eine Feld einfügen, das sich dann immer von selbst aktuallisiert?


Gruß Nixdorf

Verfasst: Mi, 30.05.2007 12:13
von Bernhard
=(heute) -> das bringt das aktuelle Datum!

Verfasst: Mi, 30.05.2007 12:27
von nixdorf
Hallo,

da erscheint bei mir dann nur:

#NAME?


Gruß NIxdorf

Verfasst: Mi, 30.05.2007 12:36
von Karolus
Hallo

=HEUTE()
ist besser.

Gruß Karo

Re: Tagesdatum

Verfasst: Mi, 13.06.2007 11:31
von komma4
wenn Du uns den Code des Makros nicht zeigst - dann wird es SEHR schwierig mit einer Fehleranalyse ....

Re: Tagesdatum

Verfasst: Mi, 13.06.2007 11:35
von Karolus
Hallo

Es würde die Antwort erleichtern wenn du den ganzen Makrocode posten würdest.

date liefert nur einen String des heutigen Datums, falls du in der Tabelle nach Datumswerten suchst probiers mal mit dem Vergleich auf: ....= datevalue(date) oder auch: ....=fix(now)
folgend ein Beispiel zum selektieren des heutigen Datums in Spalte A:

Code: Alles auswählen

 Sub heutesucheninSpalteA
odoc = ThisComponent
osheet = odoc.sheets(0)
for i = 0 to 1000
	if osheet.getcellbyposition(0,i).value = datevalue(date) then
        'if osheet.getcellbyposition(0,i).value = fix(now) then
	odoc.CurrentController.Select(osheet.getcellbyposition(0,i)
	exit sub
	end if
	next
End Sub 
Gruß Karo

Re: Tagesdatum

Verfasst: Mi, 13.06.2007 14:49
von Karolus
Hallo
Wenn du 'Suchen' verwenden möchtest, dann funtionierts über den Eintrag 'date' ohne Hochkomma, im aufgezeichneten Code,(falls die Datümer im Standard-Datumsformat gelistet sind) in deiner Aufzeichnung solltest du aber den args2 -Block rauslöschen, da du dann immer auf Zelle C401 rauskommst.

Gruß Karo

Re: Tagesdatum

Verfasst: Mi, 13.06.2007 15:59
von Karolus
Hallo
"Hopsen" kannst du auch mit richtigem Makrocode:

Code: Alles auswählen

 ....
if osheet.getcellbyposition(0,i).value = datevalue(date) then
        'if osheet.getcellbyposition(0,i).value = fix(now) then
   odoc.CurrentController.Select(osheet.getcellbyposition(2,i)
......
Gruß Karo