Marko Wert aus Zelle verschieben
21.10.2016 21:15:01
Christoph
ich möchte, das die aktuelle Urzeit in der aktivierten Zelle automatisch als Indstriezeit eingeben werden wird.
Für die aktuelle Uhrzeit habe ich folgendes Makro gefunden
Selection.Value = "=now()"
Selection.Copy
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False
Damit habe ich schon das aktuelle Datum in der aktivierten Zelle.
Mit einer Nebenrechnung bekomme ich auch die aktuelle Uhrzeit in Indstriezeit umgerechnet
STUNDE(A1)+MINUTE(A1)/60)
Kann ich mir diesen Schritt irgendwie sparen und alles in ein Makro packen, so das die aktuelle Uhrzeit als Industriezeit in die aktivierte Zelle eingetragen wird?
Danke & Gruß,
Chris
Anzeige