Wagner... acho que só é possível com Programação.
Supondo que os dados sejam inseridos na Plan1 e a senha seja 123:
No VBAProject... EstaPasta_de_Trabalho:
Private Sub Workbook_Open()
Sheets("Plan1").Activate
ActiveSheet.Unprotect ("123")
lin = Range("A65536").End(xlUp).Row + 1
Rows(lin & ":65536").Locked = False
ActiveSheet.Protect ("123")
Cells(lin, 1).Select
End Sub
Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel
Postado : 14/07/2011 9:55 am