使用VBA代码后,无法再访问我的excel工作簿

时间:2019-12-07 05:19:21

标签: excel vba

我试图在线搜索代码以在用户超过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

0 个答案:

没有答案