Excel - Ocultar linhas com valor zero em várias planilhas

Questão

Por favor, ajudem-me a fazer uma macro na Excelsheet que:

Eu posso esconder as linhas inteiras se um valor de célula ou (intervalo de valores) tem um valor zero em várias folhas ??? Quero dizer, por exemplo, quando abro o arquivo ou quando clico na parte inferior do controle para executar a macro.

Meu caso é:

Eu tenho um arquivo de excel que tem 32 folhas para cada pessoal, e cada folha tem uma tabela de 3 colunas

 (A, B, C) e 26 linhas (1-26). Coluna A para texto Coluna B para texto também Coluna C para Valores 

minha solicitação é para ocultar / mostrar a (s) linha (s) inteira (s), dependendo do valor na coluna C e de cada folha do 32, pressionando um comando ou alterando os valores ou o que for.

Solução

Objetivo:

Para filtrar / ocultar as linhas em todas as planilhas para um determinado valor.

Suposições:

1. A localização da coluna é a mesma em todas as folhas

3. Filtro precisa ser aplicado em todas as folhas

3. Folhas não estão escondidas

4. Todas as folhas têm pelo menos uma célula preenchida

PASSOS

1. Leia as suposições

2. Faça uma cópia de segurança

3. Pressione ALT + F11 e insira um novo módulo

4. Cole o código e execute-o

CÓDIGO:

 Sub HideRows () Dim Sheet Como objeto Dim filterFor Como variante Dim iFilterCol As Integer iFilterCol = 3 'aplicar filtro em 3 col filterFor = InputBox ("Insira o valor a ser filtrado", "Filter out") Para cada planilha na planilha Sheets .Selecione If ActiveSheet.AutoFilterMode Then Cells.Selecione Selection.AutoFilter End If Cells.Select Se ActiveSheet.AutoFilterMode = False Then Selection.AutoFilter End Se Selection.AutoFilter Campo: = iFilterCol, Criteria1: = "" & filterFor, Operador: = xlAnd Próximo final sub 

Nota

Graças a rizvisa1 por esta dica no fórum.

Artigo Anterior Próximo Artigo

Principais Dicas