Vergangene Zeit seitdem Arbeitsmappe geöffnet ist

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