Al consultar se ejecutan las macros

Lo que se me ocurre es que pongas las macros a nivel medio y cada vez que abras el documento le dices que deshabilite las macros.
[email protected]

Disculpa, creo que la pregunta se ha grabado mal.
La formulo de nuevo;
Hola;
tengo un libro con dos hojas, en una de ellas (numeral) el numero de
documento y la fecha se actualizan cada vez que se abre el documento. En la
otra hay un formulario que se rellena con datos. Al salir se guarda todo el libro,
en un directorio especifico con el numero de una celda y el nombre del libro.
De este modo cuando quiero consultar, solo tengo que buscar el documento por
su numero. El problema es que al abrir el documento guardado para consultar,
se ejecutan de nuevo las macros y crea un documento nuevo con una neva fecha.
Como puedo hacer para que esto no ocurra y me permita solo consultar el
documento??
Private Sub
Workbook_Open()
Call Sub numfac0()
ActiveSheet.Unprotect
"clave-1"
x =
Hoja2.Range("D9")
Range("D9").Value
= (x + 1)
ActiveSheet.Protect
"clave-1"
ActiveWorkbook.Save
Application.DisplayAlerts
= False
End Sub
Call guardar
Sub guardar()
ActiveWorkbook.SaveAs
ActiveSheet.Protect
"clave-1"
End Sub
Private Sub
Workbook_BeforeClose(Cancel As Boolean)
Call guardarComo
Sub guardarComo()
ruta =
"C:\Documents and settings\JoTer\Escritorio\Avis\Avis"
ruta = ruta
& ActiveSheet.Cells(9, 4).Value
ActiveWorkbook.SaveAs
Filename:=ruta
End Sub

Gracias, lo malo es que esto no lo puede utilizar cualquier usuario. No se si hay una forma más automatica o más programada. si no la hay no tendre más remedio que hacerlo de este modo.  
Gracias otra vez.