excel如何实现连续3分钟未使用自动保存并关闭？

来源：百度知道 编辑：UC知道 时间：2024/06/27 09:58:36
多台电脑局域网使用，可是有的人总是使用后不关闭，导致其他人只能以只读打开，无法编辑，希望实现连续3分钟未对excel操作，或者打开后10分钟自动保存并关闭，可以使用VB指令，实现后再加分。最好是连续3分钟未使用

excel2003考虑到共享使用问题了啊，在工具菜单栏中有共享工作簿此功能，允许多个用户同时编辑文档。同时高级参数中可以保留近30天的更改记录，不过由于多用户使用涉及到刷新问题，目前最小使用间隔为5分钟。同时解决多用户冲突问题。
如果一定要实现定时自动关闭的话，请使用以下代码：

Private Sub Workbook_Open()

Dim ot As Date '定义旧时间数据类型变量
Dim nt As Date '定义最新时间数据类型变量

ot = Time '获取现在时间(老)
Do
DoEvents
nt = Time '获取现在时间(新)
If DateDiff("s", ot, nt) = 600 Then
'比较时间,既已经过去的时间,这里是600秒即10分钟

ot = nt
nt = Empty '还原时间变量(循环)

ThisWorkbook.Close (1) '条件成立保存并关闭excel
End If
Loop
End Sub

学习下，有难度啊

打开EXCEL。。。工具－－选项－－－保存－－－－自动保存

单击“工具”菜单中的“自动保存”命令。
如果“工具”菜单中没有“自动保存”命令，必须安装“自动保存”加载宏。
操作方法
选中“自动保存时间间隔”复选框。
在“分钟”框中，输入希望 Microsoft Excel 自动保存工作簿的时间间隔。
选择所需的其他选项。

建议发到www.excelhome.net,试一下,那里有VBA专版,期待高手解答

自动保存倒有，自动关闭就没听