No se encuentra proyecto de referencia o biblioteca??

[Pablus00]

Tengo un codigo de poty poty, que lo ejecuto en un archivo nuevo y sin problemas, pero si lo pongo en un archivo que uso me dice que no se encuentra el proyecto o la biblioteca?? por que ocurre esto ? y como se arregla??

Private Sub Worksheet_Activate()
Cells.EntireColumn.Hidden = True
contra = InputBox("Debes introducir la contraseña correcta o estás despedido", "CONTRASEÑA")
If contra = "Ingresos" Then
Sheets("Hoja2").Visible = True
Cells.EntireColumn.Hidden = False
Range("A1").Select
Else
Sheets("Hoja1").Activate
End If
End Sub

Lo raro es que si el archivo es nuevo, anda lo mas bien, ahora si lo uso en mi archivo deja de funcionar y me salta ese mensaje, gracias por la ayuda de antemano