Makrolaufzeit Zeit ansagen
21.06.2016 15:50:11
Dieter(Drummer)
aus diesem Forum (aber schon älter) habe ich dieses makro, dass die Laufzeit des Makros in einer MsgBox anzeigt. Das Makro läuft korrekt und perfekt.
Wenn ich jetzt keine MsgBox haben möchte, sondern die Laufzeit als Zeitansage, wird mir aber die Zeit als Datum angesagt und nicht als Urzeit. Kann man das ändern und wenn ja, wie?:
Sub MakroLaufzeit()
Dim DatAnfang As Date
DatAnfang = Now
mein Code
Application.Speech.Speak ("Laufzeit des Makros war") & Format(Now, "hh:mm:ss")
End Sub
Mit Gruß, Dieter(Drummer)