Inserisci e completa questo codice in un nuovo modulo e cambia l'oggetto di avvio a "Sub Main".
codice:
Public Declare Sub Sleep Lib "kernel32" Alias "Sleep" (ByVal dwMilliseconds As Long)

Public Sub Main()
    Do
        '<inserisci qui il codice che deve essere eseguito periodicamente>
        Sleep(300000)
    Loop Until <inserisci qui la condizione di uscita>
End Sub