Clever-Excel-Forum

Normale Version: Textausgabe mit aktuellem Datum und Uhrzeit
Du siehst gerade eine vereinfachte Darstellung unserer Inhalte. Normale Ansicht mit richtiger Formatierung.
Hallo,

habe ein ganz simples Script, das das aktuelle Datum und Uhrzeit anzeigt:

Sub Datum_anzeigen()

Range("H36") = NOW

End Sub

In Zelle H36 steht dann z.B.  06.06.2023 21:04

Wie krieg ich es hin, daß folgender Text in Zelle H36 steht:  Aktualisiert am Dienstag, den 06.06.2023 um 21:04 Uhr ?

Ist das nur eine Formatisierungssache?
moin,

wie wäre es damit?

Code:
Sub Datum_anzeigen()
    Range("H36").Value = "aktualisiert am " & Format(Now, "dddd") _
        & ", den " & Format(Now, "DD.MM.YYYY") & " um " & Format(Now, "hh:mm") & " Uhr"
End Sub

mfg Tom
Danke. klappt prima. Wieder etwas dazugelernt.
Wenn man alle vorbelegten Datumssymbole im Fließtext mittels Backslash maskiert, reicht ein einzelner Bezug auf now
Code:
Range("H36") = Format(Now, "aktuali\siert a\m: dddd, \de\n dd.mm.yyyy u\m hh:nn U\hr")

betrifft hier
• s für second
• m für month
• d für day
• n für minute
• h für hour
fehlt nur noch w für week

Wenn Du wirklich etwas lernen willst, solltest Du Dir mal die umfangreiche Hilfe zur format-Funktion durchlesen und damit üben.
https://learn.microsoft.com/de-de/office...plications
Es lohnt sich!