Fórum Excel Bácico, Avançado e Vba
Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.
Fórum Excel Bácico, Avançado e Vba

Este fórum é destina a usuário de Excel, que queiram compartilhar informações a básicas, avançadas e programação em VBA...
 
InícioInício  Últimas imagensÚltimas imagens  ProcurarProcurar  RegistarRegistar  Entrar  

 

 Ocultar "LINHA" com determinado valor.

Ir para baixo 
2 participantes
AutorMensagem
carlossantos




Mensagens : 1
Data de inscrição : 25/06/2014

Ocultar "LINHA" com determinado valor. Empty
MensagemAssunto: Ocultar "LINHA" com determinado valor.   Ocultar "LINHA" com determinado valor. EmptyQui Jun 26, 2014 1:21 am

Boa noite.

Alguém pode customizar o código: ?

Sub oculta()
'
Dim faixa As Range
Dim celula As Range
Set faixa = Range("A1:A100")
For Each celula In faixa
Rows(celula.Row).Select
Selection.EntireRow.Hidden
= (celula.Value = "X")
Next
End Sub

Explicando:
Quando executar a macro, todas as linhas que a céluna da coluna "A" conter "X" ficarão ocultas.

O Problema é que eu uso em cima de uma planilha com no máximo 500 linhas, mas ao executar a macro o excel seleciona linha por linha e vai ocultando onde tem o "X".

Queria algo mais rapido, que não precise ir linha por linha.

Na coluna A eu irei inserir fórmulas pois em uma unica planilha listo mais de um tipo de relatório e em alguns pode conter 400 linhas e em outros somente uma linha, por isso quero a macro que oculte sozinho.

Obrigado!
Ir para o topo Ir para baixo
alexandrevba

alexandrevba


Mensagens : 1820
Data de inscrição : 13/07/2011
Localização : Serra - ES

Ocultar "LINHA" com determinado valor. Empty
MensagemAssunto: Re: Ocultar "LINHA" com determinado valor.   Ocultar "LINHA" com determinado valor. EmptyQui Jun 26, 2014 2:16 pm

Bom dia!!

Use o gravado de macro, grave uma usando autofiltro.

Eu fiz com 1000 linhas
Código:
Sub Macro1()
    Selection.AutoFilter
    ActiveSheet.Range("$A$1:$A$1000").AutoFilter Field:=1, Criteria1:="X"
End Sub

Att
Ir para o topo Ir para baixo
 
Ocultar "LINHA" com determinado valor.
Ir para o topo 
Página 1 de 1
 Tópicos semelhantes
-
» MACRO p/ Inserir linha apos encontrar um determinado valor
» Procurar um determinado valor e retorna o valor relativo a maior data
» Maior valor em um determinado dia.
» Interromper o envio de e-mail após um determinado valor na celula.
» Identificar o valor de uma linha e copiá-la inteira

Permissões neste sub-fórumNão podes responder a tópicos
Fórum Excel Bácico, Avançado e Vba :: Avançado/VBA :: Excel Avançado/VBA-
Ir para: