Selecione apenas células visíveis

Question

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   

    

Answer 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!

    

Answer 2

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