Selecione apenas células visíveis

3

Estou procurando uma maneira de obter uma coluna de dados (70 algumas linhas) com algumas entradas visíveis, algumas células vazias e alguns resultados de fórmulas. Estou procurando uma maneira de copiar apenas os dados inseridos e os resultados das fórmulas.

por exemplo

    T1  T2  T3  T4  T5
    2   2       1   5
    1   6   3   4   
    1       6       1
        2   4   1   2
    1   2   1   3

retornaria

    T1  T2  T3  T4  T5
    2   2   3   1   5
    1   6   6   4   1
    1   2   4   1   2
    1   2   1   3   
    
por PsychoData 05.09.2013 / 20:51

2 respostas

1

Uma solução não VBA:

  1. Selecione a tabela.
  2. Pressione Ctrl + G
  3. Pressione Especial ...
  4. Escolha "Blanks"
  5. Pressione Ctrl + -
  6. Escolha "Deslocar células para cima"
  7. Pressione Enter

Tadaa!

    
por 06.09.2013 / 23:42
1

Estou supondo que sua planilha se parece com isso:

AbraoVBEALT+F11einsiraumnovoModule

CopieecoleocódigoabaixoeexecuteoRemoveEmptiesAndShfitUpsub

SubRemoveEmptiesAndShiftUp()DimiAsLong,jAsLong,rAsRangeForj=Cells(1,Columns.Count).End(xlToLeft).ColumnTo1Step-1Fori=Cells(Rows.Count,j).End(xlUp).RowTo2Step-1Setr=Cells(i,j)IfIsEmpty(r)Thenr.Deleteshift:=xlUpSetr=NothingNextiNextjEndSub

Ocódigoiráiterardalinhadaúltimacolunaparaaprimeiralinhadasegundacolunaeremovertodasascélulasvazias,deslocandoasoutrasparacima.Entãoseuresultadoseráparecidocom

    
por 06.09.2013 / 09:26