How to insert function in simple vba

[Scorpion Steve]

Hey Guys,
I have a basic vba where I need written to say "at 15:00:00, save workbook"


Sub MyMacro()

Application.OnTime

TimeValue("15:00:00"), "MyMacro"
'YOUR CODE
End Sub

Would the above be a simple way?
Thanks

 

[John_w]

Sub Set_Timer()
    Application.OnTime TimeValue("15:00:00"), "Save_Workbook"
End Sub

Sub Save_Workbook()
    ActiveWorkbook.Save
End Sub