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  FAQFAQ  BuscarBuscar  MembrosMembros  GruposGrupos  Registrar-seRegistrar-se  Login  

Compartilhe | 
 

 Deletar células vazias

Ver o tópico anterior Ver o tópico seguinte Ir em baixo 
AutorMensagem
thaperon



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

MensagemAssunto: Deletar células vazias   Sex 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??
Voltar ao Topo Ir em baixo
Ver perfil do usuário
alexandrevba



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

MensagemAssunto: Re: Deletar células vazias   Sex 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
Voltar ao Topo Ir em baixo
Ver perfil do usuário
thaperon



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

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

Infelizmente não funcionou  Neutral 
Tem como eu incluir a planilha aqui para você dar uma olhada??
Voltar ao Topo Ir em baixo
Ver perfil do usuário
alexandrevba



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

MensagemAssunto: Re: Deletar células vazias   Sex 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
Voltar ao Topo Ir em baixo
Ver perfil do usuário
thaperon



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

MensagemAssunto: Re: Deletar células vazias   Sex 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*
Voltar ao Topo Ir em baixo
Ver perfil do usuário
thaperon



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

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

enviei o link errado!
o certo é este aqui:

http://w*w*w*.sendspace.com/file/*ex5af9*
Voltar ao Topo Ir em baixo
Ver perfil do usuário
alexandrevba



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

MensagemAssunto: Re: Deletar células vazias   Sab Mar 22, 2014 3:30 pm

Boa tarde!!

Sinto muito mas eu não consegui...


Att
Voltar ao Topo Ir em baixo
Ver perfil do usuário
Conteúdo patrocinado




MensagemAssunto: Re: Deletar células vazias   Hoje à(s) 4:43 pm

Voltar ao Topo Ir em baixo
 
Deletar células vazias
Ver o tópico anterior Ver o tópico seguinte Voltar ao Topo 
Página 1 de 1
 Tópicos similares
-
» Células
» Deletar fórum
» Como mesclar células do fórum (tal como no phpBB3)
» Deletar todas as mensagens de um usuário
» Como deletar algumas contas em meu forum

Permissão deste fórum:Você não pode responder aos tópicos neste fórum
Fórum Excel Bácico, Avançado e Vba :: Avançado/VBA :: Excel Avançado/VBA-
Ir para: