Caso queira agendar uma macro para rodar um certo horário basta usar a função Ontime conforme abaixo:

Sub Teste()
  MsgBox "Deu Certo!"
End Sub

Sub Agendar()
  Call Application.OnTime(Now + TimeValue("00:00:10"), "Teste")
End Sub

A macro Teste será executada 10 segundos após a macro Agendar ter sido rodada.

Outra maneira de agendar a execução de uma macro é via o agendador de tarefas do windows, mais detalhes você encontra aqui.

Caso queria esse arquivo, favor enviar um email para atendimento@exceleaccess.com solicitando.