das folgende Makro trägt die aktuelle Uhrzeit beim auslösen des Makros in
die aktive Zelle ein und formatiert die Zelle mit dem Format hh:mm:ss
Sub Stoppuhr()
ActiveCell.FormulaR1C1 = "=NOW()-TODAY()"
Selection.Copy
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
Selection.NumberFormat = "h:mm:ss"
End Sub
Das Makro einer Schaltfläche zuweisen; bei jedem Mausklick auf die
Schaltfläche wird die aktuelle Zeit eingetragen.
Gruß
Martin Beck
Christopher Reuter <christoph...@planet-interkom.de> schrieb in im
Newsbeitrag: oFYH3QO5#GA....@fnews2.vi-internet.de...
Reference: <oFYH3QO5#GA....@fnews2.vi-internet.de>
From: Christopher Reuter <christoph...@planet-interkom.de>
> Wenn jemand weiss wie das funktionieren könnte bitte mail an:
>
Christopher,
sie dir dazu die Seite http://www.busko.de/excel/beispiele.htm an, auf
der du ein entsprechendes Beispiel finden wirst.
Gruss,
Bernd
--
mailto:be...@busko.de
http://www.busko.de