Seite 1 von 1

Re: Timestamp

Verfasst: Fr, 11.09.2009 16:40
von Karolus
Hallo
Ich kenn mich mit der VBA-syntax nicht aus - ist 'ActiveCell....' die derzeit selektierte Zelle? --dann reicht der Einzeiler:

Code: Alles auswählen

Sub Main
thisComponent.currentselection().formulalocal = now
End Sub
Gruß Karo

Re: Timestamp

Verfasst: Fr, 11.09.2009 20:10
von Karolus
Hallo
zerfass@t-online.de hat geschrieben:..Deine Sub geht jedoch davon aus, dass schon ein Datum in der Zelle steht.
Da das bei mir nicht der Fall ist, habe ich vor Deine Befehlszeile ein "now()" (was dem "heute()" entspricht) gesetzt.
Ich erhalte hier mit:
....fomulalocal = now
in einer vorher unveränderten Zelle : 11.09.09 19:45
now oder auch now() ist eine Laufzeitfunktion in Basic, und ist nicht die Calc-funktion die per:
...formulalocal = "=HEUTE()"
bzw.
....formula = "=NOW()"
gesetzt wird.
zerfass@t-online.de hat geschrieben: Frage: Kann man die Sub auch mit eine Tastenkombination, z.B. Strg-t aufrufen und wenn ja, wie mache ich die Zuordnung?
-->Extras-->Anpassen -->'Tastatur'....

Gruß Karo

Re: Timestamp

Verfasst: Fr, 11.09.2009 21:37
von Karolus
Hallo

Ändere besser erstmal (im Basiceditor) den Makronamen auf irgendeinen sprechenden Namen zB.: sub zeit_stempel

-->Extras-->Anpassen 'Tastatur'
..Bereich "Tastenkombinationen" Strg+T angeklickt.
...
Bei "Funktion" steht zeit_stempel
Bei "Tasten" steht Strg+T
An dieser Stelle musst du nur noch auf die Schaltfläche 'ändern' klicken und 'ok'
(über 'speichern' speicherst du eine veränderte Tastenkonfig um sie in einer anderen OOo-installation zu laden aber das ist hier nicht nötig)

Gruß Karo