Ir para o conteúdo principal

Como copiar e colar apenas células não vazias no Excel?

A maioria de nós pode sofrer com esse problema, quando copiamos uma lista de dados que contém algumas células em branco e, em seguida, os colamos em outra coluna, as células em branco também são coladas. Isso é muito irritante quando não precisamos dos espaços em branco e queremos colar apenas as células que não estão em branco. Nesse caso, como poderíamos 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:

Copie e cole apenas células que não estejam em branco com o comando Ir para especial

Copie e cole apenas células que não estejam em branco com o recurso Filtro

Copie e cole apenas células que não estejam em branco com a fórmula de matriz

Copie e cole apenas células não vazias com código VBA

Copie e cole apenas células que não estejam em branco com o Kutools para Excel boa ideia 3


seta azul bolha direita Copie e cole apenas células que não estejam em branco com o comando Ir para especial

Com o Ir para especial comando, você pode selecionar todos os dados primeiro e, em seguida, copiá-los e colá-los em outro local.

1. Selecione sua lista de dados que deseja usar.

doc-cópia-somente-não-em branco1

2. Então clique Início > Encontrar e selecionar > Ir para especial, veja a captura de tela:

doc-cópia-somente-não-em branco1

3. No Ir para especial caixa de diálogo, verifique Constante opção, veja a captura de tela:

doc-cópia-somente-não-em branco1

4. Então clique OK, e apenas as células de valor foram selecionadas na lista.

doc-cópia-somente-não-em branco1

5. Em seguida, copie e cole os dados no local desejado. E apenas os valores das células não vazias foram colados. Veja a imagem:

doc-cópia-somente-não-em branco1

Note: Este método só está disponível para as constantes, não se aplica às células da fórmula.


seta azul bolha direita Copie e cole apenas células que não estejam em branco com o recurso Filtro

A filtros O recurso pode ajudá-lo a filtrar as células não vazias primeiro, e então você pode copiá-las e colá-las em outras células conforme necessário.

2. Clique Data > filtros, veja a captura de tela:

cópia doc apenas não em branco6

3. Em seguida, clique no botão suspenso no canto direito da célula na lista selecionada e desmarque a Blanks opção no menu suspenso. Veja a imagem:
doc-cópia-somente-não-em branco1

4. E, em seguida, clique em OK, todas as células não vazias foram filtradas conforme a seguinte captura de tela mostrada:

doc-cópia-somente-não-em branco1

5. Por fim, você pode copiar os dados filtrados e colá-los em qualquer local que precisar.

Note: Ambos os valores e fórmulas entram em vigor dessa maneira.


Selecione células não vazias de uma vez

Clique para testar gratuitamente todos os recursos em 30 dias!
doc kutools selecionar células não vazias

seta azul bolha direita Copie e cole apenas células que não estejam em branco com a fórmula de matriz

Para copiar e colar apenas as células que não estão em branco, 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:

=LOOKUP("zzzzz",CHOOSE({1,2},"",INDEX(A:A,SMALL(IF($A$1:$A$15<>"",ROW($A$1:$A$15)),ROWS($B$1:B1)))))

doc-cópia-somente-não-em branco1

Note: Na fórmula acima, A1: A15 é a lista de dados que você deseja usar. Você pode alterá-la conforme sua necessidade.

2. Então aperte Shift + Ctrl + Enter juntas e, a seguir, selecione a célula B1 e arraste a alça de preenchimento para o intervalo que você deseja que contenha esta fórmula, e todos os valores de células não vazios foram extraídos. Veja a imagem:

doc-cópia-somente-não-em branco1

3. Por serem fórmulas, ao copiá-las para outro local, deve-se copiá-las e colá-las como valores.

Note: Esta fórmula só está disponível para as constantes, não se aplica às células da fórmula.


seta azul bolha direita Copie e cole apenas células não vazias com código VBA

Se estiver interessado no código VBA, você pode executar o código a seguir para concluir esta tarefa.

1. Segure o ALT + F11 chaves, e abre o Janela Microsoft Visual Basic for Applications.

2. Clique inserção > Móduloe cole o seguinte código no Janela Módulo.

Código VBA: copie e cole apenas células não em branco 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. Então aperte F5 para executar este código, uma caixa de prompt aparecerá para lembrá-lo de selecionar o intervalo de dados que deseja usar. Veja a imagem:

doc-cópia-somente-não-em branco1

4. E, em seguida, clique em OK, outra caixa de prompt aparecerá para permitir que você escolha uma célula para colocar os dados.

doc-cópia-somente-não-em branco1

5. Clique OK para terminar este código, e apenas os valores das células não vazias foram colados em sua posição especificada.

Note: Este código está disponível apenas para as constantes.


seta azul bolha direita Copie e cole apenas células que não estejam em branco com o Kutools para Excel

Existe alguma maneira muito mais fácil do que acima? Claro, Kutools for Excel's Selecione Célula Não VaziaO utilitário pode ajudá-lo a selecionar as células não vazias primeiro e, em seguida, copiá-las e colá-las.

Kutools for Excel, com mais de 300 funções úteis, tornam seus trabalhos mais fáceis. 

Depois de instalação grátis Kutools para Excel, faça o seguinte:

1. Selecione o intervalo de células e clique em Kutools > Selecionar > Selecione células não vazias. Veja a imagem:
doc select nonblank célula 2

2. Em seguida, as células não vazias são selecionadas, pressione Ctrl + C para copiá-los, então vá para selecionar uma célula onde você deseja produzir o resultado paseted, pressione Ctrl + V para colar células não vazias selecionadas. Veja a imagem:
doc select nonblank célula 3

seta azul bolha direita Copiar e colar apenas células não em branco

Kutools para Excel: mais de 300 funções que você deve ter no Excel, Teste gratuito de 30 dias a partir daqui

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 (11)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
=Filter(A:A,A:A<>"")
This comment was minimized by the moderator on the site
Array formula Works fine on text
but don't work on numbers.
This comment was minimized by the moderator on the site
Not working on Numbers !!!
Works fine on text !!!
Please guide
This comment was minimized by the moderator on the site
Thanks for the great tips! I am using the Find & Select feature, but it's taking a long time because my spreadsheet contains 70 columns and 450k rows. Is there a way to fasten the process?
This comment was minimized by the moderator on the site
When i select and copy only non-blank cells, how can i then paste it somewhere else with keeping the same empty ranges between them?
This comment was minimized by the moderator on the site
These tools delete the blank cells and compress the row. I want the format to be retained, including the spaces, but I do not want empty cells to overwrite cells containing existing data. i.e. I want to add the new, copied, cells in a column onto an existing column.
This comment was minimized by the moderator on the site
Hi #abc I have used your formula =LOOKUP("zzzzz",CHOOSE({1,2},"",INDEX('List of Overdue items'!A:A,SMAL L(IF('List of Overdue items'!A$1:A$15 00"",ROW('List of Overdue items'!A$1:A$15 00)),ROWS('List of Overdue items'!B$1:B2)) ))) I have data in one Worksheet and want to copy that data into another worksheet (same doc). Can you help?
This comment was minimized by the moderator on the site
Is there a way to make the macro work when referencing between different sheets?
This comment was minimized by the moderator on the site
This formula is absolutely amazing, thank you. Unfortunately it breaks when trying to copy from another sheet, is there a workaround?
This comment was minimized by the moderator on the site
correct the references when using the formula between different sheets. It does work. =LOOKUP("zzzzz",CHOOSE({1,2},"",INDEX('List of Overdue items'!A:A,SMALL(IF('List of Overdue items'!A$1:A$1500"",ROW('List of Overdue items'!A$1:A$1500)),ROWS('List of Overdue items'!B$1:B2)))))
This comment was minimized by the moderator on the site
thanks for the super formula: =LOOKUP("zzzzz",CHOOSE({1,2},"",INDEX(A:A,SMALL(IF($A$1:$A$15"",ROW($A$1:$A$15)),ROWS($B$1:B1)))))
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations