Kann man feststellen, seit wann eine Arbeitsmappe geöffnet
ist ?
Dazu muss man folgenden Code in ein Modul
in die entsprechende Arbeitsmappe einfügen und diese Datei
erneut öffnen
oder aber die Sub Auto_Open starten.
Dim Startzeit
Sub Auto_Open()
Startzeit = Timer
End Sub
Sub Status()
Laufzeit = (Timer - Startzeit)
MsgBox Laufzeit & " Sekunden"
End Sub
|