Sugiro que faça da seguinte forma:
1. Selecione todas as células da planilha.
2. Em seguida, a opção de Formatar Células.
3. Na aba Proteção, desmarque a opção Bloqueada, e pressione Ok.
4. Clique com o botão direito na aba de planilha e selecione a opção Exibir Código
5. Coloque este código aqui no módulo que se abre
Private Sub Worksheet_Change(ByVal Target As Range)
ActiveSheet.Unprotect Password:="Senha"
Target.Locked = True
ActiveSheet.Protect Password:="Senha"
End Sub
Obs: Substitua "Senha" pela senha que deseja utilizar.
Desta forma a planilha aceitará que novos valores sejam digitados nas células e, em seguida à entrada de dados, ficarão travadas para alterações.
[ ]s
Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel
Postado : 03/09/2010 7:29 pm