Fórum Excel Bácico, Avançado e Vba
Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.
Fórum Excel Bácico, Avançado e Vba

Este fórum é destina a usuário de Excel, que queiram compartilhar informações a básicas, avançadas e programação em VBA...
 
InícioInício  Últimas imagensÚltimas imagens  ProcurarProcurar  RegistarRegistar  Entrar  

 

 Deletar células vazias

Ir para baixo 
2 participantes
AutorMensagem
thaperon




Mensagens : 11
Data de inscrição : 12/03/2014

Deletar células vazias Empty
MensagemAssunto: Deletar células vazias   Deletar células vazias EmptySex Mar 21, 2014 2:07 pm

Bom dia!
Tenho uma planilha na qual uma das abas filtra os dados de outra de acordo com o que o usuário da planilha deseja. Porém, ao fazer isso algumas células ficam vazias e gostaria de deleta-las para ter uma melhor visualização.
Algum código para isso??
Ir para o topo Ir para baixo
alexandrevba

alexandrevba


Mensagens : 1820
Data de inscrição : 13/07/2011
Localização : Serra - ES

Deletar células vazias Empty
MensagemAssunto: Re: Deletar células vazias   Deletar células vazias EmptySex Mar 21, 2014 2:11 pm

Bom dia!!

Tente
Código:
Sub Teste()
   
    Dim lastrow As Long
    Dim i As Long
    'Muda a coluna de acordo com sua necessidade
    lastrow = Range("A:A").End(xlDown).Row
   
    For i = lastrow To 1 Step -1
       
        If IsEmpty(Cells(i, "A").Value2) Then
           
            Cells(i, "A").Delete Shift:=xlShiftUp
        End If
    Next i
End Sub

Att
Ir para o topo Ir para baixo
thaperon




Mensagens : 11
Data de inscrição : 12/03/2014

Deletar células vazias Empty
MensagemAssunto: Re: Deletar células vazias   Deletar células vazias EmptySex Mar 21, 2014 3:16 pm

Infelizmente não funcionou  Neutral 
Tem como eu incluir a planilha aqui para você dar uma olhada??
Ir para o topo Ir para baixo
alexandrevba

alexandrevba


Mensagens : 1820
Data de inscrição : 13/07/2011
Localização : Serra - ES

Deletar células vazias Empty
MensagemAssunto: Re: Deletar células vazias   Deletar células vazias EmptySex Mar 21, 2014 3:55 pm

Bom dia!!

Use um site de hospedagem gratuito como sendspace, depois deposite o link aqui.

Caso não tenha permissão de colar o link, tente camufla-lo w*w*w*sendspace.com* (<- note os asteriscos)

Att
Ir para o topo Ir para baixo
thaperon




Mensagens : 11
Data de inscrição : 12/03/2014

Deletar células vazias Empty
MensagemAssunto: Re: Deletar células vazias   Deletar células vazias EmptySex Mar 21, 2014 3:58 pm

h*t*t*ps://**fs05u.sendspace.com/*upload?SPEED_LIMIT=0&MAX_FILE_SIZE=314572800&UPLOAD_IDENTIFIER=589887240.1395406623.C8DAB671.19.0&DESTINATION_DIR=5*
Ir para o topo Ir para baixo
thaperon




Mensagens : 11
Data de inscrição : 12/03/2014

Deletar células vazias Empty
MensagemAssunto: Re: Deletar células vazias   Deletar células vazias EmptySex Mar 21, 2014 3:59 pm

enviei o link errado!
o certo é este aqui:

http://w*w*w*.sendspace.com/file/*ex5af9*
Ir para o topo Ir para baixo
alexandrevba

alexandrevba


Mensagens : 1820
Data de inscrição : 13/07/2011
Localização : Serra - ES

Deletar células vazias Empty
MensagemAssunto: Re: Deletar células vazias   Deletar células vazias EmptySáb Mar 22, 2014 3:30 pm

Boa tarde!!

Sinto muito mas eu não consegui...


Att
Ir para o topo Ir para baixo
Conteúdo patrocinado





Deletar células vazias Empty
MensagemAssunto: Re: Deletar células vazias   Deletar células vazias Empty

Ir para o topo Ir para baixo
 
Deletar células vazias
Ir para o topo 
Página 1 de 1
 Tópicos semelhantes
-
» [b]Ajuda com soma de células vazias[/b]
» Deletar linha deferente de números (diferente 0 e "vazio")
»  Deletar Guias VBA
» Deletar Linahs Baseado em criterios
» INSERIR, COPIAR,COLAR, DELETAR.

Permissões neste sub-fórumNão podes responder a tópicos
Fórum Excel Bácico, Avançado e Vba :: Avançado/VBA :: Excel Avançado/VBA-
Ir para: