COMO HAGO UN CONTADOR DE VISITANTES EN EXCEL

Hola Anonimo:
Inserta este codigo en un modulo y veras lo que sucede, este codigo lo
modifique, no recuerdo la autoria, pero me tome el permiso por no recordar,
de quien es,.. mil disculpas

Private Sub Workbook_Open()

' Mensaje para saber si hay una nueva visita a la hoja de calculo
' y cambiar el numero y la fecha
If MsgBox("DESEA VISUALIZAR ESTE ARCHIVO", vbYesNo, "Confirmar") _
= vbYes Then

' Incrementamos el numero del visitante
Sheets("Hoja1").Range("H4") = Sheets("Hoja1").Range("H4") + 1

' Guardamos el libro con el numero cambiado
ActiveWorkbook.Save

' Colocamos la fecha del sistema
Range("H3").Value = Date

' Seleccionamos la celda para empezar a colocar los datos del cliente
Range("F8").Select

Else
End If

End Sub


"DUDAS DE EXCEL" <DUDAS DE escribió en el
mensaje news:

QUIERO PONER UN CONTADOR EN EXCEL, PARA CADA VEZ QUE SE ABRA LA PAGINA

¿COMO

LE HAGO?
GRACIAS DE ANTEMANO.