Microsoft Excel

Herbers Excel/VBA-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.

GrußformelHomepage


  

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




Beiträge aus den Excel-Beispielen zum Thema "=JETZT() Funktion"