[gelöst] wie Änderungsdatum einfügen?

[Hazel]

Hallo Theophilus

Versuche doch mal

Code: Alles auswählen

=HEUTE()

als Zelleintrag.

Grüße aus Franken
Hazel

[lorbass]

Im OpenOffice.info-Forum habe ich vor einiger Zeit ein Kochrezept Mit der HEUTE()-Funktion in Calc erzeugtes Datum fixieren geschrieben.

Gruß
lorbass

[Herb]

Ich werf mal was Simples ein:
=heute() Zelle kopieren,
auf Ziel-Zelle gehen, rechts klick > Inhalte einfügen > Zahlen markieren, Formeln deaktivieren, ok,
fertig.

[lessger]

Du kannst Dir selber eine StarBasic Funktion schreiben

Code: Alles auswählen

Function ChangedOn() As Date

	Dim oSheet As Object
	Dim ChgDate As Variant
	
	oSheet = ThisComponent()
	
	ChgDate = oSheet.DocumentProperties.ModificationDate

'	ChgDate ist leer, wenn das Dokument noch nie gespeichert wurde. In diesem Fall CreationDate nutzen

	If ChgDate.Year = 0 Then
		ChgDate = oSheet.DocumentProperties.CreationDate
	End If
	
	ChangedOn = DateSerial(ChgDate.Year, ChgDate.Month, ChgDate.Day)
	
End Function

Diese Funktion kann aus einer Zelle mit =ChangedOn() aufgerufen werden und gibt das Modifikationsdatum zurück, oder falls es das noch nicht gibt, das CreationDate.

Gruß
Gerhard

[Mau]

Du kannst Dir selber eine StarBasic Funktion schreiben:

Code: Alles auswählen

Function ChangedOn() As Date

	Dim oSheet As Object
	Dim ChgDate As Variant
	
	oSheet = ThisComponent()
	
	ChgDate = oSheet.DocumentProperties.ModificationDate

'	ChgDate ist leer, wenn das Dokument noch nie gespeichert wurde. In diesem Fall CreationDate nutzen

	If ChgDate.Year = 0 Then
		ChgDate = oSheet.DocumentProperties.CreationDate
	End If
	
	ChangedOn = DateSerial(ChgDate.Year, ChgDate.Month, ChgDate.Day)
	
End Function

Diese Funktion kann aus einer Zelle mit =ChangedOn() aufgerufen werden und gibt das Modifikationsdatum zurück, oder falls es das noch nicht gibt, das CreationDate.

Lieber Gerhard,
könnte man diese Funktion auch in Writer verwenden, um in eine Datei das aktuelle Datum als Fixwert einzufügen?

[karolus]

Lieber Mau!

In Writer gibts dafür →Einfügen→Feldbefehl→Datum

Karolus

[Mau]

Lieber karolus,

In Writer gibts dafür →Einfügen→Feldbefehl→Datum

das weiß ich wohl und benutze es derzeit auch (noch); das erfordert aber - vor allem, wenn man ein anderes als das Standardformat TT.MM.JJ verwendet - mehrere Tasteneingaben bzw. Mausklicks. Ich möchte das gerne mit einer einzigen Taste(nkombination) erledigen können.

Gruß,
Mau

[Manne]

Hallo an alle

Gibt es auch einen Lösungsweg, um ein Datum - Letzte Änderung, für mehrere Tabellenseiten einzufügen ?
Testete diesen Weg mit =ChangedOn() und funktioniert prima, jedoch ausgerichtet für eine Seite, da sonst überall das selbe Datum angezeigt wird.

Grüße