Como ocultar linhas com base na data de hoje no Excel?
Suponha que tenha uma tabela de frutas numa folha de cálculo, como a apresentada na imagem abaixo, e que precise de ocultar todas as linhas anteriores ou posteriores à data atual (14/06/2016). Este artigo mostra-lhe três métodos para o fazer.
Ocultar linhas com base na data de hoje com a função Filtro
Ocultar linhas com base na data de hoje com código VBA
Ocultar linhas com base na data de hoje com Kutools para Excel
Ocultar linhas com base na data de hoje com a função Filtro
Com a função Filtro no Excel, pode filtrar facilmente todas as linhas relevantes e ocultar as indesejadas com base na data de hoje.
1. Na tabela, clique na seta para baixo da coluna Data e, em seguida, selecione Filtros de Data > Antes ou Depois. Veja a imagem:
Notas:
2. Na caixa de diálogo Filtro Automático Personalizado, clique no botão Seleção de Data
junto à caixa «é posterior a» e, em seguida, clique no botão Hoje no calendário. Depois, clique no botão OK.
Assim, todas as linhas anteriores à data de hoje são automaticamente ocultadas.
Desbloqueie a Magia do Excel com KUTOOLS AI
- Execução Inteligente: Realize operações em células, analise dados e crie gráficos — tudo impulsionado por comandos simples.
- fórmulas personalizadas: Crie fórmulas personalizadas para simplificar os seus fluxos de trabalho.
- Programação VBA: Escreva e implemente código VBA com facilidade.
- Interpretação de Fórmulas: Compreenda facilmente fórmulas complexas.
- Tradução de Texto: Elimine barreiras linguísticas nas suas folhas de cálculo.
Ocultar linhas com base na data de hoje com código VBA
Também pode utilizar código VBA para ocultar linhas com base na data de hoje no Excel. Siga os passos abaixo.
1. Prima simultaneamente as teclas Alt + F11 para abrir a janela do Microsoft Visual Basic para Aplicações.
2. Na janela do Microsoft Visual Basic para Aplicações, clique em Inserir > Módulo. Em seguida, copie e cole o seguinte código VBA na janela.
Código VBA: Ocultar linhas com base na data de hoje no Excel
Private Sub Hidebtn_Click()
Dim xRg As Range
Dim xTxt As String
Dim xCell As Range
On Error Resume Next
If ActiveWindow.RangeSelection.Count > 1 Then
xTxt = ActiveWindow.RangeSelection.AddressLocal
Else
xTxt = ActiveSheet.UsedRange.AddressLocal
End If
Set xRg = Application.InputBox("Please select range:", "Kutools for Excel", xTxt, , , , , 8)
If xRg Is Nothing Then Exit Sub
Application.ScreenUpdating = False
For Each xCell In xRg
If xCell.Value < Now Then
xCell.EntireRow.Hidden = True
End If
Next
End Sub3. Prima a tecla F5. Na caixa de diálogo que surge, Kutools para Excel, selecione a coluna Intervalo de Datas e, em seguida, clique no botão OK.
Agora, todas as linhas anteriores à data de hoje são ocultadas automaticamente.
Notas:
Código VBA: mostrar todas as linhas ocultas no Excel
Private Sub Showbtn_Click()
Rows.EntireRow.Hidden = False
End SubOcultar linhas com base na data de hoje com Kutools para Excel
Com a utilidade Selecionar células específicas do Kutools para Excel, pode selecionar facilmente todas as linhas anteriores ou posteriores à data de hoje e, em seguida, ocultá-las manualmente.
1. Selecione a lista de datas na sua tabela e, em seguida, clique em Kutools > Selecionar > Selecionar células específicas.
2. Na caixa de diálogo Selecionar células específicas, selecione a opção Linha inteira na secção Selecionar tipo e escolha a opção Menor que ou Maior que (neste caso, selecionei a opção Menor que) na primeira lista suspensa Especificar tipo; depois, introduza a data de hoje na caixa de texto seguinte. Por fim, clique no botão OK. Veja a imagem:
3. Surge então uma caixa de diálogo a indicar quantas linhas foram selecionadas; clique no botão OK. Poderá verificar que todas as linhas anteriores à data de hoje estão selecionadas, conforme mostrado na imagem abaixo.
4. Clique com o botão direito do rato na seleção e, em seguida, clique em Ocultar no menu de contexto para ocultar todas as linhas selecionadas anteriores à data de hoje.
Se pretender experimentar gratuitamente esta utilidade durante 30 dias, clique para a transferir e, em seguida, siga os passos indicados acima.
Artigos relacionados:
- Como ocultar uma caixa de verificação quando a linha correspondente está oculta no Excel?
- Como ocultar ou mostrar linhas ou colunas utilizando o sinal de mais (+) ou menos (–) no Excel?
As Melhores Ferramentas de Produtividade para o Office
Potencie as suas competências no Excel com Kutools para Excel e experimente uma eficiência como nunca antes.Kutools para Excel Oferece mais de 300 funcionalidades avançadas para impulsionar a produtividade e Economizar Tempo.Clique aqui para obter a funcionalidade de que mais precisa...
Office Tab Traz uma interface com separadores para o Office e torna o seu trabalho muito mais fácil
- Ative a edição e leitura com separadores no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novos separadores da mesma janela, em vez de em janelas separadas.
- Aumente a sua produtividade em 50 % e elimine centenas de cliques do rato todos os dias!
Todos os suplementos Kutools — num único instalador.
Kutools for Office reúne suplementos para Excel, Word, Outlook e PowerPoint, além do Office Tab Pro, sendo a solução ideal para equipas que trabalham em várias aplicações do Office.
- Pacote tudo-em-um— suplementos para Excel, Word, Outlook e PowerPoint + Office Tab Pro
- Um instalador, uma licença— configuração em minutos (pronto para MSI)
- Funciona melhor em conjunto— produtividade simplificada em todas as aplicações do Office
- Teste gratuito de 30 dias com todas as funcionalidades— sem registo, sem cartão de crédito
- Melhor relação qualidade-preço— poupe face à compra individual dos suplementos