Herbers Excel-Forum - das Archiv

=JETZT() Funktion | Herbers Excel-Forum


Betrifft: =JETZT() Funktion
von: Christian

Geschrieben am: 06.01.2010 17:53:40

Hallo!
Habe mir schon einige Beiträge in meiner Sache angesehen, aber leider komme ich nicht weiter!
Ich möchte nur in einer Zelle (A1) gerne die Funktion „=JETZT()“ nutzen. Allerdings sollte die Aktualisierung nur einmalig beim Öffnen der Datei erfolgen und sich danach nicht mehr verändern.
Könnt Ihr mir helfen?
Beste Grüße
Christian

Betrifft: AW: =JETZT() Funktion
von: Hajo_Zi
Geschrieben am: 06.01.2010 17:56:13
Hallo Christian,
dann schreibe den Wert beim Open-Ereignis rein. Unter DieseArbeitsmappe.

Betrifft: If Range("A1").Value = "" Then Range("A1") = Now
von: Matthias L

Geschrieben am: 06.01.2010 18:05:04
Hallo Christian
Code in DieseArbeitsmappe
Private Sub Workbook_Open()
If Range("A1").Value = "" Then Range("A1") = Now
End Sub

Dies gilt wenn nur 1 Tabellenblatt vorhanden ist.
Bei mehreren Blättern bitte konkret referenzieren, also z.B.
If Tabelle3.Range("A1").Value = "" Then Tabelle3.Range("A1") = Now
Gruß Matthias

Betrifft: AW: If Range("A1").Value = "" Then Range("A1") = Now
von: Hajo_Zi
Geschrieben am: 06.01.2010 18:37:09
Hallo Matthias,
ich hätte das ohne If gesehen, da es sich beim öffnen aktualsieren soll.
Gruß Hajo

Betrifft: wer will aktualisieren ?
von: Matthias L
Geschrieben am: 06.01.2010 18:43:53
Hallo Hajo
Zitat
nur einmalig beim Öffnen der Datei erfolgen und sich danach nicht mehr verändern
Gruß Matthias

Betrifft: AW: wer will aktualisieren ?
von: Hajo_Zi
Geschrieben am: 06.01.2010 18:48:49
Hallo Matthias,
die Datei wird nur einmalig geöffnet, dann geschlossen und wieder einmalig geöffnet. So hätte ich das interpretiert.
Gruß Hajo

Betrifft: ok, kommt drauf an wie man es liest ;-)
von: Matthias L
Geschrieben am: 06.01.2010 18:49:22
Hallo Hajo
Wahrscheinlich liegst Du doch richtig.
Gruß Matthias

Betrifft: AW: ok, kommt drauf an wie man es liest ;-)
von: Willy
Geschrieben am: 06.01.2010 22:20:41
Hi
oder so

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Range("A1") = "" Then Range("A1") = Date
End Sub

in A1 wird das aktuelle Datum eingetragen, wenn du eine andere Zelle anklickst
Gruß Willy

Betrifft: Nöö, Date=Heute, Now=Jetzt und nur bei Open() oT
von: Matthias L
Geschrieben am: 06.01.2010 22:46:21

Excel-Beispiele zum Thema "=JETZT() Funktion"
Funktion ANZAHL2 ohne ausgeblendete Spalten Mit der Indirekt-Funktion auf geschlossene Arbeitsmappe zugreifen
Benutzerdefinierte SVERWEIS-Funktion über mehrere Bereiche Alle Prozeduren und Funktionen auflisten
In Funktionskategorie einordnen Ausgabe einer benutzerdefinierten Funktion in Matrixformel
Benutzerdefinierte Funktion durch Code erstellen und löschen Ermittlung von Entfernungen über benutzerdefinierte Funktion
Handhabung von Arrays in benutzerdefininierten Funktionen Arbeitsmappen-Titel über benutzerdefinierte Funktion