Hallo@all,
ich versuche verzweifelt das aktuelle Datum an eine Textbox zu
übergeben.
Range("J21").Select
ActiveCell.FormulaR1C1 = "=TODAY()"
Selection.NumberFormat = "dd/mm/yy"
Dim datum As String
datum = Cells(21, 10)
Textbox2.text = (datum)
Aber irgendwie haut´ das nicht so ganz hin, kann jemand
helfen ?
Danke und Gruß
Mike
Programmieren - alles kontrollieren 4.934 Themen, 20.613 Beiträge
Hi Mike,
ersetze mal deinen ganzen Code durch folgende 3 Zeilen:
Range("J21").Select
ActiveCell.Value = Format$(Now, "dd/mm/yy")
Textbox2.text = Format$(Now, "dd/mm/yy")
Gruss Sylvia