Como copiar e colar apenas células não vazias no Excel?
A maioria de nós pode ter enfrentado esse problema: ao copiar uma lista de dados que contém algumas células em branco e depois colá-los em outra coluna, as células em branco também serão coladas. Isso é muito irritante quando não precisamos dos espaços em branco e queremos colar apenas células não vazias. Nesse caso, como podemos copiar e colar apenas células não vazias no Excel de forma rápida e conveniente? Aqui estão alguns truques rápidos para você resolver isso:
Copiar e colar apenas células não vazias com o comando Ir Para Especial
Copiar e colar apenas células não vazias com Kutools para Excel 
Copiar e colar apenas células não vazias com o recurso Filtro
Copiar e colar apenas células não vazias com Fórmula de Matriz
Copiar e colar apenas células não vazias com código VBA
Copiar e colar apenas células não vazias com o comando Ir Para Especial
Com o comando Ir Para Especial, você pode selecionar todos os dados primeiro e depois copiá-los e colá-los em outro local.
1. Selecione sua lista de dados que deseja usar.
2. Em seguida, clique em Página Inicial > Localizar e Selecionar > Ir Para Especial, veja a captura de tela:
3. Na caixa de diálogo Ir Para Especial, marque a opção Constantes, veja a captura de tela:
4. Em seguida, clique em OK, e somente as células com valores foram selecionadas na lista.
5. E então copie e cole os dados para um local desejado. E apenas os valores das células não vazias foram colados. Veja a captura de tela:
Observação: Este método só está disponível para constantes, ele não se aplica às células de fórmulas.
Copiar e colar apenas células não vazias com Kutools para Excel
Existe alguma maneira mais fácil do que acima? Claro, o utilitário Selecionar Células Não Vazias do Kutools para Excel pode ajudá-lo a selecionar as células não vazias primeiro e depois copiá-las e colá-las.
Após instalar gratuitamente o Kutools para Excel, por favor, faça o seguinte:
1. Selecione o intervalo de células e clique Kutools > Selecionar > Selecionar células não vazias. Veja a captura de tela:
2. As células não vazias são selecionadas, pressione Ctrl + C para copiá-las, depois vá até uma célula onde deseja colocar o resultado colado, pressione Ctrl + V para colar as células não vazias selecionadas. Veja a captura de tela:
Copiar e colar apenas células não vazias com o recurso Filtro
O recurso Filtro pode ajudá-lo a filtrar as células não vazias primeiro, e depois você pode copiá-las e colá-las em outras células conforme necessário.
2. Clique em Dados > Filtro, veja a captura de tela:
3. Em seguida, clique no botão suspenso no canto direito da célula na lista selecionada e desmarque a Vazios opção no menu suspenso. Veja a captura de tela:
4. E então clique em OK, todas as células não vazias foram filtradas conforme mostrado na captura de tela abaixo:
5. Por fim, você pode copiar os dados filtrados e colá-los em qualquer local que precisar.
Observação: Tanto valores quanto fórmulas são afetados usando este método.
Copiar e colar apenas células não vazias com Fórmula de Matriz
Para copiar e colar apenas as células não vazias, você também pode aplicar a seguinte fórmula de matriz.
1. Além de seus dados, insira a seguinte fórmula em uma célula em branco:
=PROCV("zzzzz";ESCOLHER({1\2};"";ÍNDICE(A:A;MENOR(SE($A$1:$A$15<>"";LIN($A$1:$A$15));LINHAS($B$1:B1)))))
Observação: Na fórmula acima, A1:A15 é a lista de dados que você deseja usar. Você pode alterá-la conforme sua necessidade.
2. Em seguida, pressione as teclas Shift + Ctrl + Enter juntas, selecione a célula B1 e arraste a alça de preenchimento sobre o intervalo que deseja conter esta fórmula, e todos os valores das células não vazias foram extraídos. Veja a captura de tela:
3. Como são fórmulas, ao copiá-las para outro lugar, você deve copiar e colá-las como valores.
Observação: Esta fórmula só está disponível para constantes, não se aplica às células de fórmulas.
Copiar e colar apenas células não vazias com código VBA
Se você estiver interessado em código VBA, pode executar o seguinte código para concluir essa tarefa.
1. Mantenha pressionadas as teclas ALT + F11, e abrirá a janela 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: Copiar e colar apenas células não vazias no Excel
Sub PasteNotBlanks()
'Update 20140325
Dim rng As Range
Dim InputRng As Range, OutRng As Range
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
If InputRng.Columns.Count > 1 Then
MsgBox "Please select one column."
Exit Sub
End If
Set OutRng = Application.InputBox("Out put to (single cell):", xTitleId, Type:=8)
InputRng.SpecialCells(xlCellTypeConstants).Copy Destination:=OutRng.Range("A1")
End Sub
3. Em seguida, pressione a tecla F5 para executar este código, aparecerá uma caixa de prompt para lembrá-lo de selecionar o intervalo de dados que deseja usar. Veja a captura de tela:
4. E então clique em OK, outra caixa de prompt aparecerá para permitir que você escolha uma célula para colocar os dados.
5. Clique em OK para finalizar este código, e apenas os valores das células não vazias foram colados na posição especificada.
Observação: Este código só está disponível para constantes.
Melhores Ferramentas de Produtividade para Office
Impulsione suas habilidades no Excel com Kutools para Excel e experimente uma eficiência incomparável. Kutools para Excel oferece mais de300 recursos avançados para aumentar a produtividade e economizar tempo. Clique aqui para acessar o recurso que você mais precisa...
Office Tab traz interface com abas para o Office e facilita muito seu trabalho
- Habilite edição e leitura por abas no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie múltiplos documentos em novas abas de uma mesma janela, em vez de em novas janelas.
- Aumente sua produtividade em50% e economize centenas de cliques todos os dias!
Todos os complementos Kutools. Um instalador
O pacote Kutools for Office reúne complementos para Excel, Word, Outlook & PowerPoint, além do Office Tab Pro, sendo ideal para equipes que trabalham em vários aplicativos do Office.
- Pacote tudo-em-um — complementos para Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Um instalador, uma licença — configuração em minutos (pronto para MSI)
- Trabalhe melhor em conjunto — produtividade otimizada entre os aplicativos do Office
- Avaliação completa por30 dias — sem registro e sem cartão de crédito
- Melhor custo-benefício — economize comparado à compra individual de add-ins