A shared document is left open frequently so need a script that detects 5 minutes inactivity and saves changes and closes document.

thanks.

could mod the following but needs to save changes and detect inactivity.

Sub CloseAll()
'Close all open files and shutdown Word

With Application
.ScreenUpdating = False

'Loop Through...