"Autoclose after inactivity" macro

Thank you for the quick reply royUK.

I am having trouble using the code you had posted... Should I paste your code in 'This Workbook' or 'Module 1' and should I delete the old code from my original 'This Workbook' or 'Module 1' after replacing with your new code?

Thanks,

Nick

Thanks, I got it to work and also added my text box but my original 2 issues are still present:

1. Disable the startup Autoclose message text box for users who open the file using 'Read Only' or 'Notify'.

2. Change the code so that the ShutDown clock resets itself if the mouse is moved, a new cell is selected, a new worksheet is selected, or a new workbook is selected. Basically, I want to keep the workbook open for any sort of user activity.

The problem I am running into is that the workbook will still autoclose on a user who is simply tabbing between workbooks to view data, or simply using the mouse to select new cells.

Is it possible to use a similar code which performs the Windows screen saver function and implement that within the Excel macro? This would be great because with the Windows screen saver mode your screen comes back to life with just mouse movement. This would definitely take care of my problem #2 I mention above.

Thanks! I have been been working with this code on and off all day and in the process have learned a lot about VB (I'm just starting but am quickly getting the hang of it). I found some errors in your posted code: The workbook would not save before closing, there was a "Compile Error: Ambiguous name detected. Workbook_SheetChange", and the workbook was still closing even when one moved between cells, workbooks, or programs.

Through much trial and error I believe I fixed most of them and have posted the code below. However, I am still having trouble with keeping the workbook open while simultaneously working with other programs and also moving between cells.

I believe the ultimate solution to all these knacks would be to restart the Timer if the user moves the mouse regardless of whether or not Excel is currently the active running program but this is beyond my level of knowledge. Any thoughts?

Here is what I now have:

ThisWorkbook

Please Login or Register  to view this content.

Module1

Please Login or Register  to view this content.

Best regards,

Nick

Thanks Roy for this wonderful Post. Just thinking if we are not making changes in the worksheet but we are working on the userform then if no body is using the userform for 5 minutes then close the workbook???