Excel: aktuelles Datum einfügen: Teillösung

Hallo, es hat uns in diesem Forum schon mehrfach beschäftigt:
Ein Datum in Excel, das man aktuell einfügt, das aber dann NICHT mehr aktualisiert werden soll.

+. (STRG und die Punkt-Taste) fügt das aktuelle Datum ein, das von Excel künftig nicht selbsttätig verändert wird.

Vielleicht ist manchen damit geholfen.

Ludwig

ich löse dieses problem mit einem Makro:
Sub datum()
ActiveCell.Select
ActiveCell.FormulaR1C1 = „=TODAY()“
ActiveCell.Select
Selection.Copy
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
ActiveCell.Select
Application.CutCopyMode = False
ActiveCell.Offset(1, 0).Select

End Sub

Hi!

Ich mag auch Makrolösungen, aber das geht auch noch kürzer:

Public Sub aktuellesDatum()
 ActiveCell = Date()
End Sub

Statt Date() kannst Du auch Now() nehmen, dann hast Du Datum und Uhrzeit…! Möchtest Du ein bestimmtes Format (z. B. 31.12.2004) vergeben, brauchst Du noch einen Befehl mehr:

Public Sub aktuellesDatum()
 With ActiveCell
 .Value = Date()
 .NumberFormat = "dd.mm.yyyy"
 End With
End Sub

Gruß
(Woly)