Prueba con lo siguiente: Debes crear 4 macros simples:
1) En el exlorador de proyectos buscas ThisWorkbook y pones la macro de forma que cada vez que se abra el archivo llame a la seguna macro, Ejemplo:
Private Sub Workbook_Open()
Call Grabando '(Segunda macro)
End Sub
Como lo ves la primer macro solo llama a la macro que se llama "Grabando"
2) La segunda macro (Grabando) es la que guarda la copia del archivo : Ejemplo:
Sub Grabando()
ruta = "C:\Users \reynaldo.rodriguezp \Desktop \Anexos \MacroAsistencia\"
nombre = Format(Now, "dd-mm-yy-hh-mm-ss") & " " & ThisWorkbook.Name
ThisWorkbook.SaveCopyAs ruta & nombre
Call respaldos ' (Tercer Macro)
End Sub
3) Como puedes observar la última instrucción de la macro 2 (Grabando) es llamar a una tercera macro que se llama respaldos, la cual solo cumple con la función de ejecutar la macro 2 (Grabando) cada cierto tiempo según tus indicaciones, ejemplo:
Sub respaldos()
Dim Ejecutando As Boolean
tiempo = Now + TimeValue("008:00:00")
Application.OnTime tiempo, "Grabando", , True
End Sub
4) Como puedes ver la macro 2 llama a la macro 3 y así en un bucle indefinido que deberás cerrarlo con la Macro 4, la cual lo puedes hacer que se ejecute una vez cierras el libro, ejemplo:
Private Sub Workbook_BeforeClose(Cancel As Boolean)
On Error Resume Next
Application.OnTime tiempo, "Grabando", , False
Range("B1").Select
On Error GoTo 0
End Sub
La macro 1 y 4 no olvides que van en ThisWorbook.