selecionar datas <=hoje VBA EXCEL

Question

ALGUÉM PODERIA ME AJUDAR COM UM CÓDIGO EM VBA QUE SELECIONA SE AS CÉLULAS DE UMA COLUNA COM O CRITERIO <= HOJE ?

TENHO ESSE CÓDIGO ONDE SELECIONA NA COLUNA K AS CELULAS VAZIAS DO FILTRO E APÓS ESTA SELEÇÃO NA COLUNA J GOSTARIA QUE O CÓDIGO RETORNASSE SOMENTE AS DATAS <= HOJE DO FILTRO. A SELEÇÃO DAS CÉLULAS VAZIAS DO FILTRO NA COLUNA K ESTA DANDO CERTO MAS A SELEÇÃO DAS <= HOJE NA COLUNA J NÃO CONSIGO POR FAVOR ONDE ESTOU ERRANDO ?

Sub data_pag_vazias()
'
' data_pag_vazias Macro
' seleciona data pag.vazias coluna K
' e data < = hoje na coluna J na plan pagamento
'

'
    ActiveSheet.Range("$B$6:$O$639").AutoFilter Field:=10, Criteria1:="="
    ActiveSheet.Range("$B$6:$O$639").AutoFilter Field:=8, Operator:= _
        xlFilterValues, Criteria2:=Array(1, "< = hoje")

End Sub

SE ALGUÉM PUDER ME AJUDAR FICAREI MUITO GRATO.

Obrigado.

Answer 1

Tente isso:

 

Sub data_pag_vazias2()
'
' data_pag_vazias Macro
' seleciona data pag.vazias coluna K
' e data < = hoje na coluna J na plan pagamento
'

'
    ActiveSheet.Range("$B$6:$O$639").AutoFilter Field:=10, Criteria1:="="
    ActiveSheet.Range("$B$6:$O$639").AutoFilter Field:=9, Criteria1:= _
xlFilterYearToDate, Operator:=xlFilterDynamic

End Sub

 

No meu funcionou. Me avisa.

Abs,

Answer 2

Olá Mandrix funcionou perfeitamente, muito grato.

Parabéns pelo seu conhecimento e capacidade de interpretação!

Feliz Natal e um próspero Ano Novo!

Abs.

Answer 3

Só pra te situar, se vc tem registros >=365 dias esse filtro xlFilterYearToDate não vai pegar.

Só pra vc ficar ligado...

Que bom que resolveu.

 

Abs,