Como copiar e colar apenas as células não vazias no Excel?
Muitos de nós já enfrentámos este problema: ao copiar uma lista de dados que contém células vazias e colá-la noutra coluna, as células em branco são igualmente coladas. Isto torna-se particularmente frustrante quando só queremos as células preenchidas e não precisamos dos espaços vazios. Nesse caso, como copiar e colar apenas as células não vazias no Excel de forma rápida e conveniente? Eis alguns truques práticos para resolver esta situação:
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 a funcionalidade Filtro
Copiar e colar apenas células não vazias com Fórmula Matricial
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, pode selecionar todos os dados de uma só vez e, depois, copiá-los e colá-los noutra localização.
1. Selecione a lista de dados que pretende utilizar.
2. Em seguida, clique em Início > Localizar e Selecionar > Ir Para Especial. Veja a captura de ecrã:
3. Na caixa de diálogo Ir Para Especial, marque a opção Constantes. Veja a captura de ecrã:
4. Em seguida, clique em OK e apenas as células com valores serão selecionadas na lista.
5. Depois, copie e cole os dados na localização pretendida — apenas os valores das células não vazias serão colados. Veja a captura de ecrã:
Nota: Este método só está disponível para constantes; não se aplica a células que contenham fórmulas.
Copiar e colar apenas células não vazias com Kutools para Excel
Haverá uma forma mais fácil do que as anteriores? Claro que sim! A funcionalidade Kutools para Excel's Selecionar Células Não Vazias permite-lhe selecionar primeiro as células não vazias e, depois, copiá-las e colá-las.
Após instalar gratuitamenteKutools para Excel, siga os passos abaixo:
1. Selecione o intervalo de células e clique em Kutools > Selecionar > Selecionar células não vazias. Veja a captura de ecrã:
2. As células não vazias são então selecionadas; prima Ctrl + C para as copiar. Depois, selecione a célula onde pretende colar o resultado e prima Ctrl + V para colar. Selecionar células não vazias. Veja a captura de ecrã:
Copiar e colar apenas células não vazias com a funcionalidade Filtro
A funcionalidade Filtro permite-lhe filtrar primeiro as células não vazias e, em seguida, copiá-las e colá-las noutras células conforme necessário.
2. Clique em Dados > Filtro. Veja a captura de ecrã:
3. Em seguida, clique na seta no canto direito da célula com a lista selecionada e desmarque a opção Em branco no menu pendente. Veja a captura de ecrã:
4. Depois, clique em OK e todas as células não vazias serão filtradas, conforme mostrado na seguinte captura de ecrã:
5. Por fim, pode copiar os dados filtrados e colá-los onde quiser.
Nota: Este método afeta tanto os valores como as fórmulas.
Copiar e colar apenas células não vazias com Fórmula Matricial
Para copiar e colar apenas as células não vazias, pode também utilizar a seguinte fórmula matricial.
1. Além dos seus dados, introduza a seguinte fórmula numa célula vazia:
=LOOKUP(«zzzzz»,CHOOSE({1,2},«»,INDEX(A:A,SMALL(IF($A$1:$A$15<>«»,ROW($A$1:$A$15)),ROWS($B$1:B1)))))
Nota: Na fórmula acima, A1:A15 é a lista de dados que pretende utilizar. Pode alterá-la conforme necessário.
2. Em seguida, prima em simultâneo as teclas Shift + Ctrl + Enter, selecione a célula B1 e arraste a alça de preenchimento até ao intervalo onde pretende aplicar esta fórmula; assim, todos os valores das células não vazias serão extraídos. Veja a captura de ecrã:
3. Como são fórmulas, ao copiá-las para outro local, deve colá-las como valores.
Nota: Esta fórmula só está disponível para constantes; não se aplica a células que contenham fórmulas.
Copiar e colar apenas células não vazias com código VBA
Se tiver interesse em código VBA, pode executar o seguinte para concluir esta tarefa.
1. Mantenha premidas as teclas ALT + F11 e será aberta a janela Microsoft Visual Basic para Aplicações.
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, prima a tecla F5 para executar este código; surgirá uma caixa de diálogo a solicitar que selecione o intervalo de dados que pretende utilizar. Veja a captura de ecrã:
4. Depois, clique em OK e aparecerá outra caixa de diálogo para escolher a célula onde pretende colocar os dados.
5. Clique em OK para concluir a execução do código, e apenas os valores das células não vazias serão colados na posição especificada.
Nota: Este código está disponível apenas para constantes.
As Melhores Ferramentas de Produtividade para o Office
Potencie as suas competências no Excel com Kutools para Excel e experimente uma eficiência como nunca antes.Kutools para Excel Oferece mais de 300 funcionalidades avançadas para impulsionar a produtividade e Economizar Tempo.Clique aqui para obter a funcionalidade de que mais precisa...
Office Tab Traz uma interface com separadores para o Office e torna o seu trabalho muito mais fácil
- Ative a edição e leitura com separadores no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novos separadores da mesma janela, em vez de em janelas separadas.
- Aumente a sua produtividade em 50 % e elimine centenas de cliques do rato todos os dias!
Todos os suplementos Kutools — num único instalador.
Kutools for Office reúne suplementos para Excel, Word, Outlook e PowerPoint, além do Office Tab Pro, sendo a solução ideal para equipas que trabalham em várias aplicações do Office.
- Pacote tudo-em-um— suplementos para Excel, Word, Outlook e PowerPoint + Office Tab Pro
- Um instalador, uma licença— configuração em minutos (pronto para MSI)
- Funciona melhor em conjunto— produtividade simplificada em todas as aplicações do Office
- Teste gratuito de 30 dias com todas as funcionalidades— sem registo, sem cartão de crédito
- Melhor relação qualidade-preço— poupe face à compra individual dos suplementos