
Tenho informações no Excel em várias linhas. Quero copiar e colar células selecionadas e manter cada valor de célula na linha de onde foi copiado. Mas cada vez que copio os valores, eles são agrupados em linhas próximas umas das outras.
Incluí uma imagem para ilustrar o que quero e como realmente acontece. Seleciono as células da coluna B com o valor “Banana” (B2 e B4). Quando colo, quero que fiquem como na coluna D (D2 e D4). Mas o que acontece de fato é o resultado na coluna F (F2 e F3).
Eu uso o Excel 2016.
Responder1
Esse comportamento é intencional; quando você seleciona células não contíguas e as copia, o Excel não se lembra de sua localização original.
Soluções alternativas:
- Copie os valores, um de cada vez, para as células de destino.
- Copie a coluna inteira primeiro, depois filtre-a para excluir todas as células com “Banana” e exclua o conteúdo de todas as outras linhas.
- Use fórmulas para verificar se “Banana” está na mesma célula da outra planilha e só retorne um valor quando estiver. Esta fórmula deve funcionar:
=IF(B2="Banana",B2,"")
Use uma macro para examinar todas as células na coluna B e duplique o valor para a coluna D se disser "Banana" Sub BananaCopy() Const csSrc As String = "B" Const csTgt As String = "D" Const csFruit As String = "Banana"
Dim rngFruits As Range, rngCell As Range Set rngFruits = Range(csSrc & 1, csSrc & Rows.Count) For Each rngCell In rngFruits If rngCell.Value = csFruit Then Range(csTgt & rngCell.Row).Value = csFruit End If Next rngCell
Finalizar sub