Datum in einer Wenn Formel

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Hallo Edgar

so ganz ist mir das nicht klar. Folgenden Code in VBA in die Tabelle.

Folgende Annahem habe ich getroffen:
- wird in Zelle F3 was eingetragen oder Verändert wird in F4 das aktuelle Datum eingetragen.


Option Explicit

	

Private Sub Worksheet_Change(ByVal Target As Range)

	If Target.Address = "$F$3" And Target <> "" Then Range("F4") = Date

End Sub

Code eingefügt mit: Excel Code Jeanie

Code Jeanie
Frage
Das Umsetzen nach Html klappt perfekt, auch die Ansicht in den Foren ist gegeben. Bei manchen Foren kann man aber anscheinend nicht den dargestellten Code nach VBA rückkopieren. Warum?
Antwort
Dies liegt nicht an der Code Jeanie !!! Manche Foren interpretieren anscheinend < pre > < /pre > Tags nicht richtig und erzeugen am Zeilenende einen weichen Zeilenumbruch anstatt eines harten Zeilenumbruches. Dies führt dazu, dass im VBA-Editor die Zeilen hintereinander geschrieben werden. Zum Rückkopieren in solchen Fällen: Fügen Sie den kopierten Code aus dem Forum nach Word ein, kopieren Sie ihn dort wieder und fügen Sie ihn dann im VBA - Editor ein

Gruß Hajo

Hallo Hajo,

meine Tabelle baut sich wie folgt auf

Reifengrösse,Hersteller, Lagerbestand,Verkaufspreis,Eingabe Reifenverkauf von Spalte F3 bis Q3,Verkaufspreis ohne MWST,Verkauf Stückzahl, MWST.Direkt dahinter die Kundendatenbank in der selben Zeile wie folgt Verkaufsdatum, Reifengrösse, Hersteller, Verkauf Stückzahl Name des Kunden. Diese Kundendatenbank ist in einer Zeile 12 mal vorhanden, da ich von F3 bis Q3 12 mal die Stückzahl der verkauften Reifen eingeben kann.
Wenn ich in F3 4 verkaufte Reifen eingebe, wird die Summe vom lagerbestand abgezogen, die MWST ausgewiesen usw.
Auch in die Kundendatenbank wird die Reifengrösse, der Hersteller und die verkaufte Stückzahl eingetragen. Den Namen von dem Kunden muss ich selber eintragen auch das Datum.

Meine Frage: Ist es möglich,dass Excel wenn ich in F3 4 verkaufte Reifen eingebe, in meine Kundendatenbank das aktuelle Datum einträgtz.b 26.12.2002. Mit der Wenn Formel und Heute() geht das, aber Excel aktualisiert morgen das neue Datum z.b. 27.12.2002.
Das Datum 26.12.2002 muss aber stehenbleiben, weil die Garantieansprüche vom 26.12.2002 bestehen.
Für jeden Monat habe ich ein Blatt ( Januar-Dezember ) dann noch Verkauf, Einkauf und Umsatz, also 15 Blätter. Das Rechnen klappt hervorragend. Es ist kein Beinbruch wenn ich das Datum per Tastatur eingeben muss. Wäre besser wenn Excel das könnte.
Jedes Blatt hat 1000 Zeilen.
Für deine Bemühungen dake ich Dir.

Wie gesagt VBA kann ich nicht

Gruss

Edgar

Beliebteste Forumthreads (12 Monate)

6
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

316 Forumthreads zu ähnlichen Themen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

Datum in einer Wenn Formel

6 Beiträge zum Forumthread Beiträge zu diesem Forumthread

316 Forumthreads zu ähnlichen Themen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

6
Beiträge zum Forumthread

Beiträge zu diesem Forumthread