Dieses Forum nutzt Cookies
Dieses Forum verwendet Cookies, um deine Login-Informationen zu speichern, wenn du registriert bist, und deinen letzten Besuch, wenn du es nicht bist. Cookies sind kleine Textdokumente, die auf deinem Computer gespeichert werden. Die von diesem Forum gesetzten Cookies werden nur auf dieser Website verwendet und stellen kein Sicherheitsrisiko dar. Cookies aus diesem Forum speichern auch die spezifischen Themen, die du gelesen hast und wann du zum letzten Mal gelesen hast. Bitte bestätige, ob du diese Cookies akzeptierst oder ablehnst.

Ein Cookie wird in deinem Browser unabhängig von der Wahl gespeichert, um zu verhindern, dass dir diese Frage erneut gestellt wird. Du kannst deine Cookie-Einstellungen jederzeit über den Link in der Fußzeile ändern.

Wenndann datum
#11
hmm, dass verstehe ich leider nicht. Also wenn ich die Tabelle öffne, dann kann ich da leider gar nichts ändern .. bzw, egal was ich eintippe es verändert sich nichts!! das mit dem VBA habe ich eh noch nicht so ganz verstanden ! Lieber wäre mir das mit der literation 1 , weil mir das einfacher erscheint ... aber bisher sind für mich beides böhmische Dörfer :D .. ich durchsuche schon das Internet .. aber das ist alles Excelsprache von Leuten die wissen was sie da tun , nicht so wie bei mir  :22: :19: ... trotzdem vielen Dank ..
Antworten Top
#12
Hi Peppe,

du musst natürlich Makros aktivieren, damit das funktioniert!


LG
Alexandra
Antworten Top
#13
Hi Peppe,

hab' dir mal die Links rausgesucht, in deren Beiträgen du fündig werden kannst.

https://www.clever-excel-forum.de/thread-170.html  (VBA-Lösung)
https://www.clever-excel-forum.de/thread-425.html (einfaches manuelles Datum erfassen)
https://www.clever-excel-forum.de/thread-448.html (Krücke mit HEUTE() und Datengültigkeit)

Und last but not least: ganz ohne VBA - Formel - und Krückengedöns: STRG-. (Punkt)
Gruß Günter
Jeder Fehler erscheint unglaublich dumm, wenn andere ihn begehen.
angebl. von Georg Christoph Lichtenberg (1742-1799)
Antworten Top
#14
Hey vielen Dank !

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column <> 3 And Target.Column <> 4 Then Exit Sub
    If Range("C" & Target.Row).Value <> "" Or Range("D" & Target.Row).Value <> "" Then
        Range("A" & Target.Row).Value = Now
    Else
        Range("A" & Target.Row).Value = ""
    End If
End Sub


Hat hervorragend funktioniert !!! Vielen Dank dafür :) , aber wenn ich jetzt noch Spalte E mit reinnehmen möchte zusätzlich zu "C" und "D" , dann dachte ich ich könnte einfach deine bestehende Formel um "" Or Range("E" & Target.Row).Value <> "" erweitern !! Also sprich

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column <> 3 And Target.Column <> 4 Then Exit Sub
    If Range("C" & Target.Row).Value <> "" Or Range("D" & Target.Row).Value <> "" Or Range("E" & Target.Row).Value <> "" Then
        Range("A" & Target.Row).Value = Now
    Else
        Range("A" & Target.Row).Value = ""
    End If
End Sub

Aber so einfach geht es leider nicht oder mache ich etwas falsch ???


Vielen Dank auch noch an die anderen, die sich hier die Zeit nehmen um mir zu antworten  :17:
Antworten Top
#15
verklickt..
Antworten Top
#16
Hi Peppe,

zum Antworten genügt in der Regel der Antwortenbutton auf der rechten Seite. Vollzitate (vor allem eigene) sind unnötig. Falls zum besseren Verständnis Zitate nötig sind, reichen oftmals gezielte Kopien.
Gruß Günter
Jeder Fehler erscheint unglaublich dumm, wenn andere ihn begehen.
angebl. von Georg Christoph Lichtenberg (1742-1799)
Antworten Top
#17
Hi Peppe, 

du must oben bei Target. Column <>5 natürlich auch anpassen!

LG
Alexandra
Antworten Top


Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste