Olá pessoal, gostaria de uma ajuda para inserir um código em minha planilha.
Preciso selecionar todas as celulas da coluna C, onde na coluna B (que é a data), compreenda os ultimos 7 dias ali listados... lembrando que preciso aplicar filtros de produtos, então ele deve selecionar apenas as celulas visivies.
Se puderem me ajudar em algo.
Obrigado.
Anderson.
Vídeo recomendado
https://youtu.be/diWPPPhW-9E
https://youtu.be/diWPPPhW-9E
Selecionar ultimos dados por data, com filtro aplicado.
-
- Acabou de chegar
- Mensagens: 1
- Registrado em: Qui Jul 09, 2020 10:25 am
Selecionar ultimos dados por data, com filtro aplicado.
- Anexos
-
- Sem título.png (14.92 KiB) Exibido 2158 vezes
- muca
- Acabou de chegar
- Mensagens: 5
- Registrado em: Dom Fev 05, 2017 4:58 pm
- Localização: São José dos Campos(SP)
- Contato:
Re: Selecionar ultimos dados por data, com filtro aplicado.
Sub Filtrar()
Dim P As String
With ActiveSheet
P = .Cells(.Rows.Count, "A").End(xlUp).Row
End With
ActiveSheet.Range("$A$1:$C$" & P).AutoFilter Field:=1, Criteria1:="7", _
Operator:=xlBottom10Items
Range("C2:C8").Select
End Sub
Dim P As String
With ActiveSheet
P = .Cells(.Rows.Count, "A").End(xlUp).Row
End With
ActiveSheet.Range("$A$1:$C$" & P).AutoFilter Field:=1, Criteria1:="7", _
Operator:=xlBottom10Items
Range("C2:C8").Select
End Sub