Ir para o conteúdo principal

Como permitir a edição de objetos em planilhas protegidas no Excel?

Por padrão, os objetos inseridos, como formas, caixas de texto não podem ser editados depois de proteger a planilha. Se você precisar editar objetos em uma planilha protegida, tente os métodos neste artigo.

Permitir a edição de objetos em planilhas protegidas marcando a opção Editar Objetos
Permitir a edição de objetos em planilhas protegidas com código VBA


Permitir a edição de objetos em planilhas protegidas marcando a opção Editar Objetos

Marque a opção Editar Objetos para permitir a edição de objetos antes de proteger a planilha. Faça o seguinte.

1. Clique Avaliações > Folha de proteção.

2. No Folha de proteção caixa de diálogo, especifique uma senha no Senha para desproteger a folha caixa e marque a Editar objetos caixa na caixa Permitir que todos os usuários desta planilha e, em seguida, clique no OK botão. Confirme sua senha no Confirmar palavra-passe caixa de diálogo. Veja a imagem:

Agora a planilha está protegida e todos os objetos nesta planilha protegida são editáveis.


Permitir a edição de objetos em planilhas protegidas com código VBA

Se a planilha já foi protegida, você pode tentar o script VBA abaixo para permitir a edição de objetos. Faça o seguinte.

1. aperte o outro + F11 simultaneamente para abrir o Microsoft Visual Basic para Aplicações janela.

2. No Microsoft Visual Basic para Aplicações janela, clique duplo Esta pasta de trabalho no lado esquerdo Projeto painel. Em seguida, copie e cole o código VBA abaixo no Esta Pasta de Trabalho (Código) janela.

Código VBA: permite editar objetos em planilhas protegidas

Private Sub Workbook_Open()
    Application.ScreenUpdating = False
    On Error Resume Next
    With Worksheets("Sheet3")
        .EnableOutlining = True
        .EnableAutoFilter = True
        .Protect Password:="123", _
        Contents:=True, DrawingObjects:=False, UserInterfaceOnly:=True, _
        AllowFormattingCells:=True
    End With
    Application.ScreenUpdating = True
End Sub

Note: No código, Folha3 é a planilha protegida que contém os objetos que você precisa editar. E o número “123” é a senha da folha protegida. Altere-os conforme necessário.

3. aperte o F5 chaves para executar o código, e todos os objetos nesta planilha protegida são editáveis ​​imediatamente.


Artigos relacionados:

Melhores ferramentas de produtividade de escritório

🤖 Assistente de IA do Kutools: Revolucionar a análise de dados com base em: Execução Inteligente   |  Gerar Código  |  Crie fórmulas personalizadas  |  Analise dados e gere gráficos  |  Invocar funções do Kutools...
Recursos mais comuns: Encontre, destaque ou identifique duplicatas   |  Excluir linhas em branco   |  Combine colunas ou células sem perder dados   |   Rodada sem Fórmula ...
Super pesquisa: VLookup de múltiplos critérios    VLookup de múltiplos valores  |   VLookup em várias planilhas   |   Pesquisa Difusa ....
Lista suspensa avançada: Crie rapidamente uma lista suspensa   |  Lista suspensa de dependentes   |  Lista suspensa de seleção múltipla ....
Gerenciador de colunas: Adicione um número específico de colunas  |  Mover colunas  |  Alternar status de visibilidade de colunas ocultas  |  Compare intervalos e colunas ...
Recursos em destaque: Foco da Grade   |  Vista de Design   |   Grande Barra de Fórmula    Gerenciador de pastas de trabalho e planilhas   |  Biblioteca (Auto texto)   |  Data Picker   |  Combinar planilhas   |  Criptografar/Descriptografar Células    Enviar e-mails por lista   |  Super Filtro   |   Filtro Especial (filtro negrito/itálico/tachado...) ...
15 principais conjuntos de ferramentas12 Texto Ferramentas (Adicionar texto, Remover Personagens, ...)   |   50+ de cores Tipos (Gráfico de Gantt, ...)   |   Mais de 40 práticos Fórmulas (Calcule a idade com base no aniversário, ...)   |   19 Inclusão Ferramentas (Insira o código QR, Inserir imagem do caminho, ...)   |   12 Conversão Ferramentas (Números para Palavras, Conversão de moedas, ...)   |   7 Unir e dividir Ferramentas (Combinar linhas avançadas, Dividir células, ...)   |   ... e mais

Aprimore suas habilidades de Excel com o Kutools para Excel e experimente uma eficiência como nunca antes. Kutools para Excel oferece mais de 300 recursos avançados para aumentar a produtividade e economizar tempo.  Clique aqui para obter o recurso que você mais precisa...

Descrição


Office Tab traz interface com guias para o Office e torna seu trabalho muito mais fácil

  • Habilite a edição e leitura com guias em Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
  • Abra e crie vários documentos em novas guias da mesma janela, em vez de em novas janelas.
  • Aumenta sua produtividade em 50% e reduz centenas de cliques do mouse para você todos os dias!
Comments (1)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Hi,
thanks for the helpful article. I tried the VBA Code method but it doesn't quite work for me.


My Code (sorry for formatting, couldn't copy&past it):


Sub Workbook_Open ()

Dim ws As Worksheet

For Each ws In Worksheets

ws.Protect UserInterfaceOnly:=True, Password:="123"

ws.Enable AutoFilter = True

ws.EnableOutlining = True

If ActiveSheet.Protection.AllowFormattingColumns = False Then

ActiveSheet.Protect AllowFormattingColumns:=True

End If

With Worksheets ("Sheet1")

.EnableOutlining = True

.EnableAutoFilter = True

.Protect Password:="123", _

Contents:=True, DrawingObjects:=False, UserInterfaceOnly:=True

End With

Next ws

End Sub


It works just fine but as soon as I'm saving, closing and reopening the file, I am either

- requested to insert the Password (like 5 times) immediately or

- able to remove the protection without any Password for one of the worksheets (usually "Sheet1" as in the Code)


Is somebody getting the same error as me? Or can somebody help me?


Thank you in advance.


BR

Vanessa
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations