Automatic Backup Every 30 Minutes with Msg Box Confirmation

So we implemented this code thinking that it was backing up our files every 30 minutes and turns out it was not...

Code located in ThisWorkbook

Please Login or Register  to view this content.

Code in Module:

Please Login or Register  to view this content.

Can someone please offer a suggestion with a more robust codde or maybe a differnet way to implement this so it doesnt fail?
Thank you kindly

thank you bsalv, I will try this.

Logit, Yes I need to have the autobackup to be active when the file is open.

I am getting a Run Time error '1004' at this line in the Sub StartTime ()

The error is 'Method 'OnTime', of object'_Application Failed

Section of code , line 5:

Please Login or Register  to view this content.

This is how I implemetned the code:

This code is inside of my module:

Please Login or Register  to view this content.

This section of code is in ThisWorkbook:

Please Login or Register  to view this content.

What am I doing incorrectly?

Oh man I ended up getting a critical error and had to restore the file. Apparently there can be some issues that can happen with the Workbook Open function. Are there any different ways to do this. This is a highly senstive file. I have a love hate relationship with Excel.