Ir para o conteúdo principal

Como excluir as mesmas linhas ou intervalos em várias planilhas no Excel?

Este artigo recomenda dois métodos de exclusão de mesmas linhas ou intervalos em várias planilhas ao mesmo tempo no Excel. Faça o seguinte.

Exclua as mesmas linhas ou intervalos em várias páginas agrupando todas as páginas
Exclua as mesmas linhas ou intervalos em várias planilhas com códigos VBA


Exclua as mesmas linhas ou intervalos em várias páginas agrupando todas as páginas

É fácil agrupar todas as planilhas e, em seguida, excluir as mesmas linhas ou intervalos dessas planilhas ao mesmo tempo.

1. Clique com o botão direito em qualquer guia de planilha na pasta de trabalho atual e clique em Selecione todas as planilhas no menu do botão direito.

2. Agora todas as planilhas estão selecionadas, se você excluir certas linhas ou intervalos em uma planilha, as mesmas linhas ou intervalos em outras planilhas serão excluídos juntos.

3. Depois de excluir linhas ou intervalos em todas as páginas, clique com o botão direito na guia da página e clique em Desagrupar planilhas no menu do botão direito para desagrupar todas as planilhas.


Exclua as mesmas linhas ou intervalos em várias planilhas com códigos VBA

Além do método acima, você pode executar os seguintes códigos VBA para excluir as mesmas linhas ou intervalos em várias planilhas.

Exclua as mesmas linhas em várias páginas

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

2. No Microsoft Visual Basic para Aplicações janela, clique em inserção > Módulo. Em seguida, copie e cole o seguinte código VBA na janela Código.

Código VBA: exclua as mesmas linhas em várias planilhas no Excel

Sub bleh()
    Dim xWs As Worksheet
    Set xWs = ActiveSheet
    ThisWorkbook.Worksheets.Select
    Rows("4:5").Select
    Selection.Delete
    xWs.Select
End Sub

Note: No código VBA, 4: 5 significa que as linhas 4 e 5 serão excluídas em várias planilhas na pasta de trabalho atual. Você pode alterá-los para a linha necessária.

3. Pressione F5 para executar o código, as linhas especificadas são excluídas imediatamente de todas as planilhas na pasta de trabalho atual.

Exclua os mesmos intervalos em várias páginas

Para excluir os mesmos intervalos em várias planilhas, você pode tentar o código VBA abaixo.

Código VBA: exclua o mesmo intervalo em várias páginas

Private Sub CommandButton2_Click()
    Dim xRg As Range
    Dim xTxt As String
    Dim xWs As Worksheet
    On Error Resume Next
    Set xWs = ActiveSheet
    If ActiveWindow.RangeSelection.Count > 1 Then
      xTxt = ActiveWindow.RangeSelection.AddressLocal
    Else
      xTxt = ActiveSheet.UsedRange.AddressLocal
    End If
    Set xRg = Application.InputBox("Please select the range you want to delete across multiple sheets:", "Kutools for Excel", xTxt, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    xRg.ClearContents
    ThisWorkbook.Worksheets.Select
    ActiveWindow.SelectedSheets.FillAcrossSheets xRg, xlFillWithContents
    xWs.Select
End Sub

Depois de copiar e colar o código VBA no Módulo, pressione F5 chave para executar o código, e no pop-up Kutools for Excel caixa de diálogo, selecione o intervalo que você excluirá em várias folhas e, em seguida, clique no OK botão.

Agora, os valores das células neste intervalo específico são excluídos de todas as planilhas na pasta de trabalho atual 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 (3)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
I have a multiple data in multiple sheets and I want to delete some data with specific code in all sheets. kindly suggest.
This comment was minimized by the moderator on the site
Hi Ranit Mehta,
I don't quite understand your question. In the post, we provided a piece of VBA code for deleting data in the same range in multiple worksheets. I am not sure if this meets your needs.
The code is as follows:
Private Sub CommandButton2_Click()
    Dim xRg As Range
    Dim xTxt As String
    Dim xWs As Worksheet
    On Error Resume Next
    Set xWs = ActiveSheet
    If ActiveWindow.RangeSelection.Count > 1 Then
      xTxt = ActiveWindow.RangeSelection.AddressLocal
    Else
      xTxt = ActiveSheet.UsedRange.AddressLocal
    End If
    Set xRg = Application.InputBox("Please select the range you want to delete across multiple sheets:", "Kutools for Excel", xTxt, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    xRg.ClearContents
    ThisWorkbook.Worksheets.Select
    ActiveWindow.SelectedSheets.FillAcrossSheets xRg, xlFillWithContents
    xWs.Select
End Sub
This comment was minimized by the moderator on the site
Muchas gracias por el aporte, me ahorro mucho tiempo de trabajo.Bendiciones.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations