Excel 2010 Mover dados de várias colunas / linhas para uma única linha

Question

É tão frustrante! Recebo os dados enviados para mim e é assim:

a  1
a     2  2
a           3  3
b  1
b     2  2
b           3  3
b                 4  4
b                       5  5
b                             6  6

e eu preciso que pareça assim:

a  1  2  2  3  3
b  1  2  2  3  3  4  4  5  5  6  6

Tenho cerca de 30 colunas que precisam migrar para o valor superior em seu grupo e, em seguida, remover as duplicatas (para as quais existem cerca de 33 linhas de duplicatas, tentando reduzi-las para cerca de 8 linhas). Eu tenho procurado fóruns por vários dias e tentando pedaços de código. Estou tendo um momento tão difícil com o VBA !!!!

Mesma ilustração, mas graficamente:

 →

    

Answer 1

Você pode conseguir isso sem o VBA em poucos segundos. Apenas siga estes passos.

AVISO: Este processo substituirá seus dados originais. Se você quiser manter os dados originais, não faça isso.

1. Selecione seus dados, o mais à direita, pois você precisa selecionar tudo.

   

2. PressioneF5.CliqueemSpecial...nacaixadediálogoIrparaqueaparece.SelecioneBlanksecliqueemOK.Issoselecionarátodasascélulasembranconosseusdados.

3. Sem clicar em qualquer lugar, cole o seguinte na barra de fórmulas. Certifique-se de ajustar as referências da célula para corresponder aos seus dados.

   =IF($A2=$A1,C2,"")

   Pressione Ctrl + Digite . Isso aplicará a fórmula a todas as células selecionadas. A fórmula verifica se a linha abaixo tem o mesmo valor na coluna A. Em caso afirmativo, retorna o valor imediatamente abaixo. Se não, não retorna nada.

   

4. Agora,selecionetodososseusdadosnovamente,copie-osePasteSpecial...>Valuesdevoltaaomesmointervalo.Issoremoveráasfórmulasquevocêacaboudeinserir,masmanteráosvalores.

5. Porfim,comtodososseusdadosselecionados,váparaafaixadeopçõesDadoseselecioneRemoveDuplicates.RemoverduplicatascombasenacolunaA(acolunacomosvaloresaeb).

   Isso manterá a linha superior de cada valor na coluna A e removerá o restante. Você deve ficar com o que você quer.