Hallo,

ich suche nun schon länger eine Lösung für mein Problem und komme im Moment nicht so recht weiter weil mir VBA irgendwo anscheinend meine Formel abbricht - keine ahnung, bin ja auch blutiger Anfänger.

Versuche nun schon seit Stunden es hinzubekommen, dass in jeder Zeile von Spalte A ein Zeitstempel gesetzt wird, wenn in Spalte B ein Wert (egal ob text oder Zeit) gesetzt ist.

Den Zeitstempel schaff ich schon zu setzen - aber noch nicht mit der Bedingung dass er automatisch gesetzt werden soll wenn jemand in Spalte B was eintippt. Möchte also auch vermeiden, dass jemand mit einen Buttonklick oder dem Aufrufen des Makros dieses erst starten muss um den Zeitstempel zu setzen. <br>

Mein Code bisher:

Sub ZeitstempelMakro()

If Not IsEmpty("B:B) then

Columns("A:A").Select

Selection.Find(What:="").Activate

ActiveCell.FormulaR1C1 = Format(Now, "dd.mm.yyyy hh:mm:ss")

End If

End Sub

Vielleicht kann mir jemand helfen und mir den kleinen Logikfehler finden helfen

danke!