Home Excel - Dicas Microsoft Excel VBA Excel VBA - Loops Excel planilha vba loop deletar dados apos determinada data

Excel planilha vba loop deletar dados apos determinada data

E-mail Imprimir PDF

Saberexcel - site das macros

Esta macro do Aplicativo Microsoft Excel VBA, deleta os dados de uma determinada folha de planilha a partir de uma data específica, contém um Loop (laço) que verifica a próxima linha e deleta dados enquanto houver dados.

Sub procura_data_inicial_deleta_restante()
SABEREXCEL = InputBox("Digite a data no formato dd/mm/aaaa - " & Range("M5"), "Saberexcel - site das macros")
If SABEREXCEL <> "" Then

On Error Resume Next
[A:A].Find(What:=CDate(SABEREXCEL), LookIn:=xlValues).Select
ActiveCell.Offset(1, 0).Select

Do While IsEmpty(ActiveCell.Offset(0, 0)) = False 'faça enquanto houver dados na coluna(A)
ActiveCell.Value = ""
ActiveCell.Offset(0, 1).Value = ""
ActiveCell.Offset(1, 0).Select
Loop
If Err <> 0 Then MsgBox "Data nao encontrada!" 'se nao encontrar a data fornecida retorna msg

End If
End Sub


Sub copiar_valores_teste()
Range("M5:N28").Select
Selection.Copy
Range("A5").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Range("C1").Select
Application.CutCopyMode = False
Range("D3").Select
End Sub




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

 
   08:55:14
Excel planilha vba loop deletar dados apos determinada data (27.18 kB)



Publicidade:
Compre com qualidade, garantia e preços baixos nas lojas SubMarino
Informática - Submarino.com.br

Última atualização em Sáb, 13 de Agosto de 2011 19:31  

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

Pesquisa Google SaberExcel

Publicidade Google

Publicidade

Rastreamento Correios

Digite o número do SEDEX conforme o exemplo:
Correios do Brasil

Assinatura SaberExcel

Google Associados

Depoimentos

Visitantes SaberExcel

Excel VBA Estudos®
mod_vvisit_countermod_vvisit_countermod_vvisit_countermod_vvisit_countermod_vvisit_countermod_vvisit_countermod_vvisit_countermod_vvisit_counter
mod_vvisit_counterHoje888
mod_vvisit_counterOntem5104
mod_vvisit_counterEsta Semana30652
mod_vvisit_counterSemana passada36487
mod_vvisit_counterEsse mês44381
mod_vvisit_counterMês passado153723
mod_vvisit_counterTodos10467210
Aprenda MS Excel VBA

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