Como inserir comentários numa folha de cálculo protegida?
De um modo geral, é fácil inserir comentários em células de uma folha de cálculo não protegida. No entanto, por vezes é necessário proteger a sua folha com uma palavra-passe e, mesmo assim, continuar a poder inserir comentários na folha protegida. Como pode fazer isto no Excel?
Inserir comentários numa folha de cálculo protegida ao marcar a opção Editar objetos
Inserir comentários numa folha de cálculo protegida com código VBA
Inserir comentários numa folha de cálculo protegida ao marcar a opção Editar objetos
Para inserir comentários numa folha de cálculo protegida, marque a opção Editar objetos enquanto protege a sua folha. Siga estes passos:
1. Clique em Rever > Proteger Folha, conforme ilustrado:
2. Na caixa de diálogo Proteger Folha, introduza a sua palavra-passe na caixa de texto Palavra-passe para desproteger a folha e, em seguida, desloque-se para baixo e marque a opção Editar objetos na lista Permitir que todos os utilizadores desta folha. Veja a imagem:
3. Em seguida, clique em OK e reintroduza a sua palavra-passe na caixa de diálogo Confirmar Palavra-passe.
4. Depois, clique em OK para fechar as caixas de diálogo e, agora, a sua folha está protegida, mas ainda pode inserir comentários nesta folha.
Nota: Com este método, não só pode inserir comentários como também outros objetos, tais como imagens, gráficos e muito mais.
Inserir comentários numa folha de cálculo protegida com código VBA
Além de marcar a opção **Editar objetos** ao proteger a folha, pode também aplicar o seguinte código VBA. Este código permite-lhe inserir um comentário numa célula e, de seguida, proteger a folha. Siga os passos abaixo:
1. Clique na célula onde pretende inserir um comentário.
2. Mantenha premidas as teclas ALT + F11 para abrir a janela Microsoft Visual Basic para Aplicações.
3. Clique em Inserir > Módulo e cole o código seguinte na Janela do Módulo.
Código VBA: Inserir comentários numa folha de cálculo protegida
Public Sub InsertComment()
'Update 20140723
Dim xPW As String
Dim xComment As String
xPW = “123456”
xTitleId = "KutoolsforExcel"
xComment = Application.InputBox("Input comments", xTitleId, "", Type:=2)
Application.ActiveSheet.Unprotect Password:=xPW
Application.ActiveCell.AddComment
Application.ActiveCell.Comment.Text Text:=xComment
ActiveSheet.Protect Password:=xPW
End Sub
4. Em seguida, prima a tecla F5 para executar este código. Irá surgir uma caixa de diálogo onde deverá introduzir o conteúdo do seu comentário, conforme necessário — veja a imagem:
5. Clique em OK para fechar esta caixa e o seu comentário será inserido na célula especificada, com a sua Planilha Atual protegida.
Notas:
1. Pode alterar a palavra-passe para a sua própria em xPW = “123456” do código acima apresentado.
2. Se pretender inserir outro comentário, basta selecionar uma célula e executar novamente este código, introduzindo o respetivo conteúdo do comentário.
Artigos relacionados:
Como filtrar comentários no Excel?
Como agrupar e desagrupar linhas numa folha de cálculo protegida?
As Melhores Ferramentas de Produtividade para o Office
Potencie as suas competências no Excel com Kutools para Excel e experimente uma eficiência como nunca antes.Kutools para Excel Oferece mais de 300 funcionalidades avançadas para impulsionar a produtividade e Economizar Tempo.Clique aqui para obter a funcionalidade de que mais precisa...
Office Tab Traz uma interface com separadores para o Office e torna o seu trabalho muito mais fácil
- Ative a edição e leitura com separadores no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novos separadores da mesma janela, em vez de em janelas separadas.
- Aumente a sua produtividade em 50 % e elimine centenas de cliques do rato todos os dias!
Todos os suplementos Kutools — num único instalador.
Kutools for Office reúne suplementos para Excel, Word, Outlook e PowerPoint, além do Office Tab Pro, sendo a solução ideal para equipas que trabalham em várias aplicações do Office.
- Pacote tudo-em-um— suplementos para Excel, Word, Outlook e PowerPoint + Office Tab Pro
- Um instalador, uma licença— configuração em minutos (pronto para MSI)
- Funciona melhor em conjunto— produtividade simplificada em todas as aplicações do Office
- Teste gratuito de 30 dias com todas as funcionalidades— sem registo, sem cartão de crédito
- Melhor relação qualidade-preço— poupe face à compra individual dos suplementos