Auto save

Is there anyway to have my auto save that I created to have a time delay say like 5 minutes. We enter data in several spots and how I have it set up it takes to long to enter. I attached a image of my code, sorry its a picture but didnt feel like typing it all out on my phone.

Sent from my SCH-R950 using Tapatalk 2

Here is a different macro that I am trying out, I don't remember exactly where I found it at, so sorry can't give credit. What I would like it to do is start saving when workbook opens then after the workbook closes I would like it to stop.
Any help would be greatly appreciated.



'Macro that saves every 45 minutes

'This is in a Module

Sub SaveTruck()
ThisWorkbook.Save
Application.OnTime Now + TimeSerial(0, 45, 0), "SaveTruck"
End Sub


'This is in ThisWorkbook
' Starts the auto save

Private Sub Workbook_Open()
SaveTruck
End Sub

Sent from my SCH-R950 using Tapatalk 2

Solved, figured out a new way

Sent from my SCH-R950 using Tapatalk 2