Notifications
Clear all

Macro Limpar Conteúdo

2 Posts
2 Usuários
0 Reactions
609 Visualizações
(@nayrajh)
Posts: 0
New Member
Topic starter
 

Boa tarde,
Eu tenho uma planilha que vai da coluna A à M.
Na coluna A aparecem alguns números.
A
602449
701167
F000297
FX00266
L800012
MX00067

O que eu gostaria é que quando aparecem na coluna A itens iniciados com F, L e M fosse automaticamente limpado o conteúdo das mesmas na coluna K.

Eu não gostaria que fosse excluido a linha não, mas sim que só fosse limpado o conteúdo da coluna K.
Os outros itens como o 302449 o que surgir na coluna K permanece.

Obs: Essa planilha é gerada todos os dias, e em seguida atualizada. Ou seja, hoje o F pode aparecer na A1 por exemplo mas amanhã pode aparecer na B1. Por isso eu preciso que seje localizado para depois ser limpo o conteudo.

Ja me ajudaram mandando essa resolução, só que ela esta demorando demais a executar:

Sub Limpar()

Dim LR As Long, c As Range
LR = Cells(Rows.Count, 1).End(3).Row
For Each c In Range("A1:A" & LR)
Select Case Left(c, 1)
Case "F", "L", "M", "Q"
c.Offset(, 10) = ""
End Select
Next c
End Sub

Alguém consegue me ajudar por favor?

 
Postado : 11/05/2016 8:35 am
(@mprudencio)
Posts: 0
New Member
 

Tem que ser por vba???

Com formula pode ser assim cole na coluna que desejar que a celulas sejam apagadas.

=SE(OU(ESQUERDA(A1;1)="L";ESQUERDA(A1;1)="F";ESQUERDA(A1;1)="M";ESQUERDA(A1;1)="Q");"";"OUTRA CONDIÇÃO")

No lugar de OUTRA CONDIÇÃO, coloque a condição que considerar adequada.

 
Postado : 11/05/2016 8:57 am