Alguien me puede ayudar con una macro para guardar automáticamente cada 8 horas y reemplazar

Visita ese ejemplo

http://www.programarexcel.com/2013/03/este-sencillo-codigo-evita-dolores-de.html

Código que se inserta en thisworkbook
Private Sub Workbook_Open()
Application.OnTime Now + TimeValue("00:01:00"), "grabando"
End Sub
Código que se debe insertar en un módulo de VBA
Sub grabando()
ActiveWorkbook.Sabe
Application.OnTime Now + TimeValue("00:01:00"), "grabando"
End Sub

visita http://www.programarexcel.com