Tópicos relacionados a códigos VBA, gravação de macros, etc.
  • Avatar do usuário
#68176
Bom dia

Preciso de uma Macro que conte a quantidade de células da Coluna [Registro] da Tabela TB_Procedimentos que apresentam valor igual à "-" e que depois exclua essas linhas.

Poderiam me ajudar?

Segue planilha para aplicação e teste da Macro.
Você não está autorizado a ver ou baixar esse anexo.
#68177
Boa tarde.
Veja se esta macro atende a sua necessidade.

Sub ExcluirLinhas()
Dim Plan As Worksheet
Dim rng As Range
Dim c As Range
Set Plan = Wsh_Procedimentos
Set rng = Plan.ListObjects("TB_Procedimentos2").ListColumns(1).Range
Do
Set c = rng.Find("-", LookIn:=xlValues)
If Not c Is Nothing Then c.EntireRow.Delete
Loop While Not c Is Nothing
End Sub

Até

Foxtri
SandroLima agradeceu por isso

comexdtv, Bom Dia. Quando voce formata uma c&eacu[…]

Três soluções. Duas com f&oacu[…]

Segue uma imagem para facilitar! Sugest&atild[…]

Sugestão: utilize e função H[…]

Anexei cópia do seu arquivo e coloquei a f&[…]

Olá @osvaldomp Funcionou sim, era isso[…]

Preciso estruturar uma planilha de gestão d[…]

Olá, @milastrix . Segue outra vers&ati[…]