Alberto Jimenez Cabrera respondió:
Puedes usar la instrucción Protect, de la siguiente forma Me.Protect Password:="tu_passsword", UserInterfaceOnly:=true Puedes usarlo en el evento Activate de la hoja y te quedaría mas o menos así Private Sub Worksheet_Activate() Me.Protect...