AutoSave an Excel file to its original location, overwriting?

Hello, you need to Excel at a specified time interval to save changes to the file from which it was opened, but not to AppData. What solutions are there?
June 14th 19 at 18:06
1 answer
June 14th 19 at 18:08
Solution
In a personal macro workbook ("Personal.xlsb") add event to open the workbook (module "Atasnya")
Private Sub Workbook_Open()
AutoSaveAllWorkbooks
End Sub


AutoSaveAllWorkbooks - the Procedure of saving all open workbooks (restart procedure every 30 sec.)

Add a module and paste the following code:
Public Sub AutoSaveAllWorkbooks()
 Dim wb As Workbook

 For Each wb In Application.Workbooks
wb.Save

 Set wb = Nothing
Next

 Application.OnTime Now + TimeValue("00:00:30"), "AutoSaveAllWorkbooks"

End Sub

Find more questions by tags Excel