Hallo,
ich möchte gerne eine Textbox mit einer Zelle vergleichen. Wenn diese einen unterschiedlichen wert haben. Möchte ich in eine andere Zelle das heutige Datum schreiben.
Aber es passiert garnichts. Hab ich irg wo einen Fehler drin?
Mein Code:
If Cells(Selection.Row, 31).Value <> TextBoxPreisLieferant1.Value Then Cells(Selection.Row, 34) = Date: Cells(Selection.Row, 34).NumberFormat = "dd.mm.yyyy;@"
Gruß
|