Home Excel - Dicas Microsoft Excel VBA Excel VBA - Linhas e Colunas Excel planilhas vba linha deletar linhas baseado em branco

Excel planilhas vba linha deletar linhas baseado em branco

E-mail Imprimir PDF

Saberexcel - O site de quem precisa aprender Macros Microsoft Excel VBA

E
ssa macro do Aplicativo Microsoft Excel VBA(Visual Basic Application), deletam linhas baseada em critérios, neste caso
deletará linhas baseadas nas células em branco que existirem nas colunas: (F), (G), (H)

'simplificando códigos de programação ms excel vba.
Sub Deletar_Linhas_Celulas_Branco()
MsgBox ("Linhas onde houver células em branco na coluna(F:G:H) serão DELETADAS!!!!")
      vUltimaLinha = Cells.SpecialCells(xlLastCell).
Row
    
  
  'montando o loop para verificar nas células  vazias nas colunas específicas
     'veja que a simetria e orgranização do código facilita o entendimento, obdeçam esse critério.
     '
     For i = vUltimaLinha To 1 Step
-1
        
'-----------'
        'Observem que não exisite o End If (fechando a estrutura if) - porque há uma condição verdadeira na frente do
Then
         If Cells(i, "F").Value = "" Then Rows(i).Delete
         If Cells(i, "G").Value = "" Then Rows(i).Delete
         If Cells(i, "H").Value = "" Then Rows(i).Delete
        
'-----------'
     Next i
    
End Sub

Simplifiquei a estrutura da macro copiar e colar.
Os códigos copiam de uma planilha e cola em outra planilha na célula (A1)
você poderá nomear um range dinâmico para isso, cada vez que for inserido dados,
o range dinâmico expande com tamanho dos dados digitados.
Esse tipo de programação estarei explanando nos -  
Modulos Como Fazer - Saberexcel


'veja que uso o nome de código da folha de planilha(Saber1,Saber2), porque?,
'- Se o usuário mudar o nome da folha de planilha, não gera erro... certo?

Sub copiar_colar_teste()
  Saber2.[A1:Q25].Copy Saber1.[A1]
End Sub

 


Aprenda tudo sobre o Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo,
praticando com os produtos didáticos
SaberExcel




  Baixe o exemplo de Planilha contendo as macros acima
vba linhas deleta criterio celulas em branco colunas (23.99 KB)

Última atualização em Seg, 01 de Outubro de 2012 19:18  

Comentários   

 
Guest
# Guest 23-11-2011 16:22
Boa tarde...

Existe uma macro para deletar colunas baseado em critérios?

Se na linha 1, existir alguma célula com a string "deleta", excluir a coluna inteira


Seria isto, não estou encontrando exemplos.

Muito obrigado

ZUCOLLI
Responder | Responder com citação | Citar
 
 
Guest
# Guest 02-12-2011 09:24
Prezado Carlos,
Veja bem, tem um exemplo de planilha no site com determinado código,
que localiza determinada palavra e a substitui, ora, se é capaz de substituir também é capaz de fazer muitas outras coisas, não é mesmo.
Baixe o exemplo de planilha e mude o seguinte código.
de:
Range("A" & i).Value = "Curso_VBA_Saberexcel"
Para:
Range("A" & i).Delete
Baixe o exemplo:
microsoftexcel.com.br/.../...
Fique com Deus. Expedito Marcondes.
Responder | Responder com citação | Citar
 
 
Guest
# Guest 25-01-2012 09:31
Expedito, bom dia.

Estou iniciando meus estudos no âmbito do VBA e no momento estou quebrando a cabeça para desenvolver uma macro.

Estou tentando desenvolver uma macro que elimine as linhas inteiras de um documento sob determinada condição.

Minha pretenção é eliminar linhas inteiras onde a coluna "K" tenha células em branco ou " Valor Linha". Tentei inúmeras vezes e não cheguei a um resultado correto. Poderias me dar uma luz?

Gostaria também de parabenizá-lo pelo site e perguntar sobre qual material devo adquirir para aprender a executar macros em VBA.

Obrigado.
Responder | Responder com citação | Citar
 

Adicionar comentário

"Jamais considere seus estudos como uma obrigação, mas como uma oportunidade invejável para aprender a conhecer a influência libertadora da beleza do reino do espírito, para seu próprio prazer pessoal e para proveito da comunidade." Albert Einstein


Código de segurança
Atualizar

PROMOÇÃO DIDÁTICOS SABEREXCEL



Adquira já o Acesso Imediato
à Area de Membros

Compra Grantida --- Entrega Imediata

Aprenda Excel VBA com Simplicidade de 
códigos e Eficácia, Escrevendo Menos e
Fazendo Mais.

'-------------------------------------'
Entrega Imediata:
+  500 Video Aulas MS Excel VBA
+  35.000 Planilhas Excel e VBA
+  Coleção 25.000 Macros MS Excel VBA
+  141 Planilhas Instruções Loops
+  341 Planilhas WorksheetFunctions(VBA)
+    04 Módulos Como Fazer Excel VBA
+  Curso Completo MS Excel VBA
+  Planilhas Inteligentes


Pesquisa Google SaberExcel

Publicidade Google

<script type="text/javascript"><!--

google_ad_client = "ca-pub-2317234650173689";

/* retangulo 336 x 280 */

google_ad_slot = "0315083363";

google_ad_width = 336;

google_ad_height = 280;

//-->

</script>

<script type="text/javascript"

src="http://pagead2.googlesyndication.com/pagead/show_ads.js">

</script>

Publicidade

RSFirewallProtected


Google Associados

Depoimentos

Adicione Saberexcel Favoritos

 
 

Aprenda tudo sobre o Aplicativo Microsoft Excel VBA

Aprenda tudo sobre o Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos Saberexcel,


   Sobre as WorksheetFunctions Funções de Planilhas que retornam valores do VBA