Fóruns
Microsoft Excel - 2...
2024 - VBA & Macros
EXCLUIR LINHA INTER...
 
Notifications
Clear all

EXCLUIR LINHA INTERIRA COM CONDIÇÃO

 
2024 - VBA & Macros
Post Recente por xandrinho 8 anos atrás
4 Posts
3 Usuários
0 Reactions
1,146 Visualizações
RSS
 xandrinho
(@xandrinho)
Posts: 0
Estimable Member
Topic starter
 

Boa noite!!!
Amigos, vejam se podem me ajudar, pois estou desesperado!!!

Tenho uma planilha “infinita”, e precisava sempre excluir a linha inteira que estivesse à palavra excluir na coluna A, só que com um detalhe sempre, tem também que excluir sempre duas linhas inteiras abaixo da palavra excluir da coluna A.(... ou seja, o código sempre excluiria três linhas..)Como o trabalho vai ser muito exaustivo, prensei em encontrar um código e atrela-lo ao buton.

Seria possível?

Consegue me ajudar?

teste excluir.zip
 
Postado : 31/05/2017 5:17 pm
 Osvaldomp
(@osvaldomp)
Posts: 858
Prominent Member
 

Experimente:

Sub ExcluiLinhas()
 Dim k As Long
  For k = Cells(Rows.Count, 1).End(3).Row To 2 Step -1
   If Cells(k, 1) = "excluir" Then Rows(k & ":" & k + 2).Delete
  Next k
End Sub

Osvaldo

 
Postado : 31/05/2017 6:22 pm
 Jokaman
(@jokaman)
Posts: 44
Eminent Member
 

Xandrinho

Veja se é isto que pretende, tem dois exemplos

JCabral

 
Postado : 31/05/2017 6:32 pm
 xandrinho
(@xandrinho)
Posts: 0
Estimable Member
Topic starter
 

Ambos os exemplos me ajudaram....

Muito Obrigado!!!

 
Postado : 31/05/2017 6:40 pm
Forum Jump:
  Tópico Anterior
Próximo Tópico