rene, use :

Para Proteger :
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True, Password:="suaSenha"

e
Para Desproteger :
ActiveSheet.Unprotect Password:="suaSenha"

Lembrando que de nada adiantará ter a senha diretamente na Rotina se o projeto VBA não estiver Protegido tambem, podendo ser acessado por alguem mais experiente e ver qual é a senha definida.

Se pesquisar no Forum encontrara outras opções, como o Tópico abaixo :
MACROS EM PLANILHA PROTEGIDA
viewtopic.php?f=16&t=739&p=2672&hilit=protect#p2672

[]s

Obrigado irmãozinho, funcionou certinho.

Mauro,

eu uso o comando de desproteger a planilha, executo a macro e depois uso o comando de proteger a planilha. Porem, utilizo userform se puder me ajudar a proteger o código do userform ficarei imensamente agradecido.

Fala galera,

Como eu modificaria esse código, para que, naquelas opções de proteção, impedir que o usuário SELECIONE AS CELULAS BLOQUEADAS. Na prática, para meu projeto, seria mais questão de estética..

Fala galera,

Como eu modificaria esse código, para que, naquelas opções de proteção, impedir que o usuário SELECIONE AS CELULAS BLOQUEADAS. Na prática, para meu projeto, seria mais questão de estética..

lenadro, O método protect tem um série de parâmetros que permitem configurar o que deseja, de uma olhada :
Fonte: - http://www.tomasvasquez.com.br/forum/vi ... word#p1650

Worksheet.Método Protect
Protege uma planilha contra modificação.
Sintaxe

expressão.Protect(Password, DrawingObjects, Contents, Scenarios, UserInterfaceOnly, AllowFormattingCells, AllowFormattingColumns, AllowFormattingRows, AllowInsertingColumns, AllowInsertingRows, AllowInsertingHyperlinks, AllowDeletingColumns, AllowDeletingRows, AllowSorting, AllowFiltering, AllowUsingPivotTables)

Parâmetros

Password: Opcional, Variant, Uma seqüência de caracteres que especifica uma senha (com distinção entre maiúsculas e minúsculas) para a planilha ou pasta de trabalho. Se este argumento for omitido, você poderá desproteger a planilha ou pasta de trabalho sem usar uma senha. Caso contrário, será necessário especificar a senha para desproteger a planilha ou pasta de trabalho. Se você esquecer a senha, não poderá desproteger a planilha ou pasta de trabalho.
DrawingObjects: Opcional, Variant, True para proteger formas. O valor padrão é True.
Contents: Opcional, Variant, True para proteger o conteúdo. Em um gráfico, protege o gráfico inteiro. Em uma planilha, protege as células bloqueadas. O valor padrão é True.
Scenarios: Opcional, Variant, True para proteger cenários. Este argumento é válido somente para planilhas. O valor padrão é True.
UserInterfaceOnly: Opcional, Variant, True para proteger a interface do usuário, mas não macros. Se este argumento for omitido, a proteção será aplicada tanto a macros quanto à interface do usuário.
AllowFormattingCells: Opcional, Variant, True permite ao usuário formatar qualquer célula em uma planilha protegida. O valor padrão é False.
AllowFormattingColumns: Opcional, Variant, True permite ao usuário formatar qualquer coluna em uma planilha protegida. O valor padrão é False.
AllowFormattingRows: Opcional, Variant, True permite ao usuário formatar qualquer linha em uma planilha protegida. O valor padrão é False.
AllowInsertingColumns: Opcional, Variant, True permite ao usuário inserir colunas na planilha protegida. O valor padrão é False.
AllowInsertingRows: Opcional, Variant, True permite ao usuário inserir linhas na planilha protegida. O valor padrão é False.
AllowInsertingHyperlinks: Opcional, Variant, True permite ao usuário inserir hiperlinks na planilha protegida. O valor padrão é False.
AllowDeletingColumns: Opcional, Variant, True permite ao usuário excluir colunas na planilha protegida, na qual cada célula da coluna a ser excluída está desbloqueada. O valor padrão é False.
AllowDeletingRows: Opcional, Variant, True permite ao usuário excluir linhas na planilha protegida, na qual cada célula da linha a ser excluída está desbloqueada. O valor padrão é False.
AllowSorting: Opcional, Variant, True permite ao usuário classificar na planilha protegida. Cada célula no intervalo de classificação deve estar desbloqueada ou desprotegida. O valor padrão é False.
AllowFiltering: Opcional, Variant, True permite ao usuário definir filtros na planilha protegida. Os usuários podem alterar os critérios de filtro mas não podem habilitar ou desabilitar um filtro automático. Os usuários podem definir filtros em um filtro automático existente. O valor padrão é False.
AllowUsingPivotTables: Opcional, Variant, True permite ao usuário utilizar relatório de tabela dinâmica na planilha protegida. O valor padrão é False.

É só configurar.

Blz Mauro, valeu...