Excel - Proteger hoja de Excel Automaticamente.

Hola ..

Tengo un problema , les cuento. Estoy haciendo una aplicacion que levanta un excel al presionar un boton y le pasa datos por medio de un OCX.

Pero lo que necesito es que cuando esta se llene con los datos se protega automaticamente para que el usuario no pueda modificar los datos de alli.

Cualquier Ayuda.
Muchas Gracias.
Cristian.

Tendrias que hacer una macro en la hoja excel que se ejecute cuando cerras la hoja, ahi le pones .protected y no recuerdo si iba la contraseña entre paréntesis.

para bloquear es asi


ActiveSheet.Unprotect (PASSW) 'para desproteger si tenia password

'Pregunta la version de excel, para >9, mayores que el 2000,ya que hay diferencias en los parametros de las versiones.

If Application.Version > 9 Then

ActiveSheet.Protect Password:=PASSW, DrawingObjects:=True, Contents:=True, Scenarios:=True _
, AllowFormattingCells:=True, AllowFormattingColumns:=True, _
AllowFormattingRows:=True, AllowInsertingRows:=True, AllowDeletingRows:= _
True, AllowSorting:=True, AllowFiltering:=True
ActiveSheet.EnableSelection = xlUnlockedCells

Else

ActiveSheet.Protect Password:=PASSW, DrawingObjects:=False, Contents:=True, Scenarios:=False

End If 'Application version