excel - VBA代码后无法再访问我的excel工作簿

Question

如果用户超过 5 分钟不活动，我试图在线搜索代码以自动关闭我的 excel 文件。

我找到了一个代码，复制了它，现在我的工作簿/代码被锁定并且无法访问它。

这是我粘贴的代码：

Private Sub workbook_open()
    starttimer
End Sub

Const idletime = 15 'seconds
Dim start
Sub starttimer()
    start = Timer
    Do While Timer < start + idletime
        DoEvents
    Loop
    Application.DisplayAlerts = False
    ActiveWorkbook.Close True
    Application.DisplayAlerts = True
End Sub

标签： excelvba