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

Boa tarde! Solicito a sua ajuda, de acordo com o […]

Controles ActiveX Excel Mac

Pessoal, seguinte: Meu sistema não roda no[…]

Olá, sou novo aqui no fórum, tenho u[…]

Boa tarde. Estou precisando automatizar uma planil[…]

Em J52 ~~~> =ÍNDICE(C10:C40;CORRES[…]

Salvar PDF sem substituir o arquivo

Boa tarde pessoal, Queria uma ajuda para fazer um[…]

Assiduidade

Bom dia a tod@s, tenho uma tabela no formato que s[…]

Ficheiro mais atualizado