Share Workbook - Update Changes

If you choose to share your workbook. You can choose to update the changes every "something" minutes.
Tools-->Share Workbook-->Advanced Tab-->Update Changes Section

The smallest amount of time that it lets you choose is 5 minutes. The problem that I have is that I want to change the amount to 1 or 2 minutes. Is there anyway that this can be done???

I'm assuming if this can be done it would be done through vba thats why im posting it here.

Thanks in Advance
Ben

An idea may be this:

put next code in workbook_open event:
Application.OnTime Now + TimeValue("00:01:00"), "my_Procedure"


then insert a module and include the next code:
Sub my_Procedure()

ActiveWorkbook.Save

Application.OnTime Now + TimeValue("00:01:00"), "my_Procedure"

End Sub

That will save workbook each minute (the time is in format hour:minute:seconds).

Regards,
Antonio