Home |
Search |
Today's Posts |
#1
|
|||
|
|||
Workbook Autoclose ...
Is it possible to make settings wherein the workbook when not in use for more
than 5 minutes, can be made to save and close automaticlly ? |
#2
|
|||
|
|||
Srini, you can with VBA, here is some code that will do it, I have had this
code for some time and I don't remember who the author was 'put this in a standard module Dim DownTime As Date Sub SetTime() DownTime = Now + TimeValue("00:05:00") Application.OnTime DownTime, "ShutDown" End Sub Sub ShutDown() ThisWorkbook.Save ThisWorkbook.Close End Sub Sub Disable() On Error Resume Next Application.OnTime EarliestTime:=DownTime, Procedu="ShutDown", Schedule:=False End Sub '******************************************* 'put this in thisworkbook module Private Sub Workbook_Open() MsgBox "This workbook will auto-close after 5 minutes of inactivity" Call SetTime End Sub Private Sub Workbook_BeforeClose(Cancel As Boolean) Call Disable End Sub Private Sub Workbook_SheetCalculate(ByVal Sh As Object) Call Disable Call SetTime End Sub Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Excel.Range) Call Disable Call SetTime End Sub '***************************** -- Paul B Always backup your data before trying something new Please post any response to the newsgroups so others can benefit from it Feedback on answers is always appreciated! Using Excel 2002 & 2003 "Srini" wrote in message ... Is it possible to make settings wherein the workbook when not in use for more than 5 minutes, can be made to save and close automaticlly ? |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
HOW DO I SUM TWO CELLS FROM ONE WORKBOOK TO ANOTHER WORKBOOK? | Excel Worksheet Functions | |||
How to hyperlink from a workbook to sheets in another workbook? | Excel Worksheet Functions | |||
Unprotect Workbook | Excel Discussion (Misc queries) | |||
make hidden window or workbook visible without specify the name | Excel Worksheet Functions | |||
Stubborn toolbars in Excel | Excel Discussion (Misc queries) |