locked
selecionar datas <=hoje VBA EXCEL RRS feed

  • Pergunta

  • 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.

    domingo, 19 de dezembro de 2010 15:28

Respostas

  • 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,
    • Marcado como Resposta AlexGyn terça-feira, 21 de dezembro de 2010 15:21
    terça-feira, 21 de dezembro de 2010 05:56

Todas as Respostas

  • 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,
    • Marcado como Resposta AlexGyn terça-feira, 21 de dezembro de 2010 15:21
    terça-feira, 21 de dezembro de 2010 05:56
  • 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.


    terça-feira, 21 de dezembro de 2010 15:23
  • 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,

    terça-feira, 21 de dezembro de 2010 18:00