Quando uma planilha do Excel cresce para abranger milhares ou mesmo centenas de milhares, de linhas , removendo manualmente cada linha individual iria demorar uma eternidade . Enquanto uma classificação rápida seria simplesmente mover cada linha em branco para o fundo, essencialmente, " apagar " , isso não vai funcionar se você precisa dos dados para ficar em sua ordem atual. Para remover linhas em branco sem alterar a ordem de uma planilha, você terá que acessar o console do Visual Basic do Excel e criar uma macro. Instruções
1

Abra a planilha do Excel que você precisa querer trabalhar. Em seguida, pressione "Alt" e " F11 " para abrir o console de Visual Basic.
2

clique com o botão direito do mouse em qualquer uma das entradas sob o título " VBAProject " título no lado esquerdo do console VBA. Passe o mouse sobre "Inserir" e escolha a opção " Módulo " na lista de opções. O novo módulo será automaticamente selecionada, ea metade direita da consola vai se tornar uma página em branco . Se você tiver várias planilhas abertas , não se esqueça que você está adicionando o módulo para o correto " VBAProject ". O nome do documento específico será localizado à direita do " VBAProject " título
3

Copie o código a seguir para o topo da página do módulo em branco : .

Sub DeleteBlankRows ( )

Dim x

As Long Com Aplicação

. Cálculo = xlCalculationManual

. ScreenUpdating = False

Fim com

O comando "Sub" cria o macro eo " Dim " comando estabelece uma variável que você vai usar mais tarde. O " cálculo" e comandos " ScreenUpdating " desligar suas respectivas funções , tornando a macro funcionar sem problemas em grandes planilhas
4

Cole o seguinte código diretamente sob o último set: .

com ActiveSheet

Cells.Replace _

O que: = "", Replacement : = " ", _

LookAt : = xlWhole , MatchCase : = False

Para x = . Cells.SpecialCells ( xlCellTypeLastCell ) . Row _

Para 1 Step -1

Se WorksheetFunction.CountA ( . linhas (x)) = 0 Then

ActiveSheet.Rows (x). Excluir

End If

Próxima

End With

o comando " Cells.Replace " , que inclui o duas linhas diretamente sob ele , olha para todas as células que incluem apenas um espaço em branco , e substitui o espaço com nada . O processo de exclusão não reconhece um espaço em branco como uma célula vazia , assim, sem este pedaço de código , qualquer linha com apenas um espaço em branco não são apagados . O " Para " comando tem o início de código na última célula na folha e trabalhar o seu caminho de volta até o topo . O "se" instrução verifica para ver se a linha estiver em branco, e em seguida, exclui -lo se for
5

Copie e cole o seguinte código imediatamente abaixo do último pedaço de código: .

Com Aplicação

. Cálculo = xlCalculationAutomatic

. ScreenUpdating = True

End With End Sub

Este código simplesmente puts o " cálculo" e configurações " ScreenUpdating " de volta ao normal e , em seguida, fecha o código com " sub End". Pressione " Alt " e " F11 " para sair do console de VBA. Todas as alterações são salvas automaticamente .
6

Clique na guia "Desenvolvedor" no topo da tela. Clique no botão " Macro " para abrir uma lista de suas macros. Selecione a opção " DeleteBlankRows " macro e clique em " Executar". A macro vai apagar todas as linhas em branco a partir de sua planilha.