online 1
gast (50)

/ Forum / Tabellenkalkulation

TabellenkalkulationTabellenkalkulation

Fragevon Alexsusi vom 27.04.2020, 18:27 Options

Datum einmalig anzeigen

Hallo,

ich hab folgendes Problem:

Ich möchte wenn ich in eine Zelle etwas eintrage, das in einer anderen Zelle das aktuelle Datum angezeigt wird. Dazu habe ich folgende Formel verwendet:

=WENN(B64>0;JETZT();"Datum")

Das Problem hierbei ist, dass wenn ich die Datei nun neu öffne, dass sich die Formel neu berechnet und ich wieder das aktuelle Datum in der Zelle habe, was ich aber gar nicht möchte...

Kennt jemand eine andere Formel wo das aktuelle Datum der Dateneingabe angezeigt wird, es sich danach aber nicht mehr verädnert?

Besten dank


Antwort schreiben

Antwort 1 von Saarbauer vom 27.04.2020, 19:12 Options

Hallo,

geht nur mit einem Makro

Gruß

Helmut

Antwort 2 von finger59 vom 27.04.2020, 19:13 Options

Hi,

schau Dir mal den nachstehenden Thread an.

Ich denke der beantwortet Deine Frage.

http://www.supportnet.de/threads/1173483


In diesem Sinne... have a nice Day... Gruß Helmut

Antwort 3 von Alexsusi vom 27.04.2020, 22:22 Options

Besten dank. Kompliziert, aber werde mich schon reinfuchsen.

Antwort 4 von Alexsusi vom 28.04.2020, 19:36 Options

Kennt jemand eventuell eine Internetseite wo man die generellen Befehlsformen von VBA einsehen kann?

Also woraus ich mir ableiten kann, dass ich jetzt zum Beispiel:

Private Sub Workbook_Open()

eintragen muss damit der Befehl beim Öffnen der Datei ausgeführt wird,

oder

Range ("A1") um das auf eine Zelle zu beziehen? Denn mit den Formeln auf die ich hingewiesen wurde kann ich so wie ich es brauche leider nichts anfangen und ich habe es auch noch nicht geschafft sie auf meinen Bedarf zu ändern.

Ich brauche halt die Funktion das wenn ich im Tabellenblatt ( Arbeitsliste 2008 ) einen Wert in Zelle B 74 eingebe, dann soll mir Excel in Spalte A 72 das Tagesaktuelle Datum schreiben und dieses danach nicht mehr verändern.

Vielen dank für eure Hilfe.

Antwort 5 von Hajo_Zi vom 28.04.2020, 19:42 Options

Hlalo Alex,
in VBA unter die Tabelle

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$B$74" Then Range("A72") = Date
End Sub

Gruß hajo

Antwort 6 von Alexsusi vom 28.04.2020, 20:27 Options

Hallo Hajo,

besten dank, funktioniert prima. Schade das ich nicht so richtig hinter das System steige ;)

Antwort 7 von Alexsusi vom 28.04.2020, 20:34 Options

Hm, wenn ich jetzt eingebe:


Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$B$64" Then Range("A62") = Date
End Sub

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$B$74" Then Range("A72") = Date
End Sub

, weil ich die Funktion ja öfter ausführe, dann bringt mir Excel bei jeder Veränderung der Zellen den Fehler:

Fehler beim Kompilieren:

Mehrdeutiger Name: Worksheet_Cange

Antwort 8 von Hajo_Zi vom 28.04.2020, 20:36 Options

Hallo alex,

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$B$64" Then
Range("A62") = Date
elseIf Target.Address = "$B$74" Then
Range("A72") = Date
end if
End Sub

Die Aktion darf nur 1x pro Tabelle sein.

Gruß Hajo

Antwort 9 von Alexsusi vom 28.04.2020, 20:42 Options

Ach so...oh je...

besten dank. Ich glaube ich muss mir mal nen Buch dafür kaufen ;)

Vielen vielen dank.

Gruß Alex

Ähnliche Themen

Datum _KW in Excel
rollerkrolli  05.04.2007 - 216 Hits - 1 Antwort

Textstring mit variablem Inhalt
hanswerner  15.06.2007 - 79 Hits - 6 Antworten

Datum formatieren
JeremyMcNeill  17.07.2007 - 51 Hits - 3 Antworten

Datum des Wochentags bestimmen.
bokap1975  24.10.2007 - 81 Hits - 9 Antworten

Datum anzeigen
scharf  31.12.2007 - 66 Hits - 12 Antworten

Hinweis

Diese Frage ist schon etwas älter, Sie können daher nicht mehr auf sie antworten. Sollte Ihre Frage noch nicht gelöst sein, stellen Sie einfach eine neue Frage im Forum..

Neue Einträge

Version: supportware 1.9.150 / 10.06.2022, Startzeit:Mon Jan 26 01:23:17 2026