Thread: Automatically saving document after each 5 minutes
View Single Post
 
Old 11-04-2022, 06:07 AM
gmaxey gmaxey is offline Windows 10 Office 2019
Expert
  
Join Date: May 2010
Location: Brasstown, NC
Posts: 1,617
gmaxey is just really nicegmaxey is just really nicegmaxey is just really nicegmaxey is just really nicegmaxey is just really nice
Default
Code:
Sub SaveMe()
Application.DisplayAlerts = False
ActiveDocument.Save
Application.DisplayAlerts = True
Application.OnTime Now + TimeValue("00:05:00"), "SaveMe"
MsgBox "Saved"
End Sub
__________________
Greg Maxey
Please visit my web site at http://www.gregmaxey.com/
Reply With Quote