Neues Datum erst um 6:00 Uhr
Texas
folgendes: Ich möchte in meiner Zelle A1 erst morgens um 6:00 das aktuelle Datum stehen haben.
Ich habe mir da was ausgedacht was aber gar nicht funzt....
Muss dazu sagen das ich auch seit nem halben jahr nix mehr in richtung vba gemacht habe....
Sub test()
Dim Nau As Date
Nau = Date & " " & "06:00:00"
Range("A1").Select
If Selection <= Nau Then
ActiveCell.Value = Now()
Else
End If
End Sub
Anzeige