Como excluir rapidamente todo o conteúdo de células desbloqueadas/não protegidas no Excel?
Se você tem uma planilha que contém algumas células desbloqueadas e agora deseja excluir todo o conteúdo dessas células de uma só vez, você tem alguma solução para lidar com essa tarefa?
Excluir todo o conteúdo das células desbloqueadas com a função Localizar e Substituir
Excluir todo o conteúdo das células desbloqueadas com código VBA
Excluir todo o conteúdo das células desbloqueadas com Kutools para Excel
Excluir todo o conteúdo das células desbloqueadas com a função Localizar e Substituir
Para limpar todos os valores das células não protegidas, você pode usar o recurso Localizar e Substituir para selecionar primeiro as células desbloqueadas e depois excluí-las imediatamente.
1. Abra sua planilha onde deseja excluir as células desbloqueadas, clique em Início > Localizar e Selecionar > Localizar ou pressione as teclas de atalho - Ctrl + F para abrir a caixa de diálogo Localizar e Substituir, veja a captura de tela:
2. Na caixa de diálogo Localizar e Substituir, clique no botão Opções para expandir a caixa de diálogo, veja a captura de tela:
3. Em seguida, clique no botão Formatar, e uma caixa de diálogo Formato de Localização será aberta. Depois, na aba Proteção, desmarque as caixas Bloqueadas e Ocultas, veja a captura de tela:
4. Clique em OK para retornar à caixa de diálogo Localizar e Substituir, depois clique no botão Localizar Tudo; todas as células não protegidas serão exibidas na caixa de listagem abaixo, e então pressione Ctrl + A para selecionar todas elas, veja a captura de tela:
5. E então feche esta caixa de diálogo Localizar e Substituir; todas as células desbloqueadas terão sido selecionadas na planilha atual, veja a captura de tela:
6. Depois, basta pressionar a tecla Delete no teclado, e o conteúdo das células desbloqueadas selecionadas será removido imediatamente.
Excluir todo o conteúdo das células desbloqueadas com código VBA
O seguinte código VBA também pode ajudá-lo a limpar o conteúdo das células desbloqueadas; por favor, siga estas instruções:
1. Pressione as teclas ALT + F11 para abrir a janela do Microsoft Visual Basic for Applications.
2. Clique em Inserir > Módulo e cole o seguinte código na Janela do Módulo.
Código VBA: Excluir todo o conteúdo das células desbloqueadas
Sub ClearUnlockedCells()
'Updateby Extendoffice
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Application.ScreenUpdating = False
For Each Rng In WorkRng
If Rng.Locked = False Then Rng.ClearContents
Next
Application.ScreenUpdating = True
End Sub
3. Em seguida, pressione a tecla F5 para executar este código e especifique um intervalo onde deseja remover o conteúdo das células desbloqueadas na caixa que aparecerá, veja a captura de tela:
4. Clique em OK, e o conteúdo nas células do intervalo desbloqueado terá sido apagado.
Excluir todo o conteúdo das células desbloqueadas com Kutools para Excel
Se você instalou o Kutools para Excel, seu recurso Selecionar Células Não Bloqueadas pode ajudá-lo a selecionar primeiro as células não protegidas, e então você pode excluí-las de uma só vez.
Kutools para Excel inclui mais de 300 ferramentas úteis para o Excel. Gratuito para teste sem limitação por 30 dias. Obtenha-o Agora
Após instalar o Kutools para Excel, siga os passos a seguir:
1. Selecione o intervalo de dados onde deseja limpar o conteúdo das células desbloqueadas.
2. Clique em Kutools > Selecionar > Selecionar Células Não Bloqueadas.
3. E todas as células desbloqueadas terão sido selecionadas em sua seleção.
4. Pressione a tecla Delete no teclado para excluir imediatamente o conteúdo das células selecionadas.
Se quiser saber mais sobre esse recurso, clique em Selecionar Células Não Bloqueadas.
Artigo relacionado:
Como selecionar todas as células desbloqueadas no Excel?
Melhores Ferramentas de Produtividade para Office
Potencialize suas habilidades no Excel com o Kutools para Excel e experimente uma eficiência sem igual. O Kutools para Excel oferece mais de300 recursos avançados para aumentar sua produtividade e economizar tempo. Clique aqui para obter o recurso que você mais precisa...
O Office Tab traz interface com abas para o Office e facilita muito o seu trabalho
- Habilite a edição e leitura com abas no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novas abas na mesma janela, em vez de abrir novas janelas.
- Aumente sua produtividade em50% e reduza centenas de cliques do mouse todos os dias!