Aktuelles Datum und Uhrzeit in Zelle in Calc schreiben

Antwort erstellen

BBCode ist eingeschaltet
[img] ist ausgeschaltet
[url] ist eingeschaltet
Smileys sind ausgeschaltet
Die letzten Beiträge des Themas
   

Ansicht erweitern Die letzten Beiträge des Themas: Aktuelles Datum und Uhrzeit in Zelle in Calc schreiben

Re: Aktuelles Datum und Uhrzeit in Zelle in Calc schreiben

von Reginald » Di, 11.10.2011 19:34

Cool. Funzt 8)
Danke, Reginald

Re: Aktuelles Datum und Uhrzeit in Zelle in Calc schreiben

von komma4 » Di, 11.10.2011 19:23

Es reicht die Änderung der Zeile

Code: Alles auswählen

   oCell.String = Now
in

Code: Alles auswählen

   oCell.Formula = Now
(wenn man zuvor oder später ein Zeit-/Datums-Zellformat einstellt)

Re: Aktuelles Datum und Uhrzeit in Zelle in Calc schreiben

von Reginald » Di, 11.10.2011 16:59

Hi,

hab's dann einfach weiter als text verwendet, und das funktioniert gut.

Wenn du noch eine andere Lösung als Datum findest, lass mich wissen. Wäre für mich auch besser.
(Ist wahrscheinlich eh nur irgendwo eine winzige Änderung...)


Grüße
Reginald

Re: Aktuelles Datum und Uhrzeit in Zelle in Calc schreiben

von komma4 » Mi, 21.09.2011 13:02

Reginald hat geschrieben:Ich möchte mit einem Tastaturbefehl in Calc ein Makro starten
Dann sieh' Dir mal meine Extension an... Makro schreiben unnötig, das gewünschte Format kannst Du im Code anpassen.

Für eine Formatierung brauchst Du den NumberFormat Code

Re: Aktuelles Datum und Uhrzeit in Zelle in Calc schreiben

von Reginald » Mi, 21.09.2011 12:58

Hey, DPunch!

Das war schnell!!! - Und funktioniert :-)

Er schreibt es allerdings als Text in die Zelle, also so '21.09.11 12:56:32

Damit kann ich die Zelle nicht mehr passend (also TT.MM.JJ HH:MM) vorformatieren.

Kann man das noch im Code ändern?

Grüße,
Reginald

Re: Aktuelles Datum und Uhrzeit in Zelle in Calc schreiben

von DPunch » Mi, 21.09.2011 12:38

Aloha

Das sieht ungefähr so aus

Code: Alles auswählen

	oDoc = thisComponent
	oSheet = oDoc.CurrentController.ActiveSheet
	oCell = oDoc.CurrentSelection(0)
	If NOT oCell.supportsService("com.sun.star.sheet.SheetCell") Then
		MsgBox "Bitte eine einzelne Zelle selektieren",48,"Hinweis"
		Exit Sub
	End If
	oCell.String = Now
	oCursor = oSheet.createCursorByRange(oCell)
	oCursor.gotoNext
	oDoc.CurrentController.Select(oCursor)

Aktuelles Datum und Uhrzeit in Zelle in Calc schreiben

von Reginald » Mi, 21.09.2011 12:26

Hallo zusammen,

kann mir jemand mit ein paar Zeilen Code behilflich sein?

Ich möchte mit einem Tastaturbefehl in Calc ein Makro starten, das mir in die aktuelle Zelle Datum und Uhrziet (DD.MM.JJ HH:MM) schreibt und dann den Cursor eine Zelle nach rechts setzt.

Ich habe eine Calc-Datei, wo ich immer wieder Notizen machen muß, die mit Datum und Uhrzeit versehen sind. Ein bißchen wie eine Datenbank. - Und es soll halt schnell gehen ...

Danke!!

Grüße,
Reginald

Nach oben