Notifications
Clear all

Loop para excluir Células em branco

3 Posts
2 Usuários
2 Reactions
1,052 Visualizações
(@celri_33)
Posts: 0
Estimable Member
Topic starter
 

Boa tarde Prezados,

Eu preciso de um loop na Coluna1 que procure células vazias, faz o movimento "excluir - deslocar células para a esquerda" e pare quando encontrar o X.

tem como fazer isso?

 

Anexo arquivo com exemplo e obrigado.

 

 
Postado : 04/05/2022 4:27 pm
(@osvaldomp)
Posts: 857
Prominent Member
 

Pode ser sem Loop ?

Sub DeletaCélulasVazias()
Range("B5:B" & Cells(Rows.Count, 2).End(3).Row).SpecialCells(4).Delete Shift:=xlToLeft
End Sub

Osvaldo

 
Postado : 05/05/2022 9:26 am
Celri_33 reacted
(@celri_33)
Posts: 0
Estimable Member
Topic starter
 

Olá, bom dia Osvaldo.

 

Funcionou perfeitamente, muito obrigado.

 
Postado : 05/05/2022 11:23 am
Osvaldomp reacted