O que está alimentando a variável ultimo_dia antes destas linhas de código?? É um inputbox, uma célula, uma outra linha de código? Não dá pra definir o erro só com este pedaço do código. Poste o código completo.

Boa Tarde Rafael

Era uma data que faz referencia a uma célula e a variavel está recebendo a data certinho mas ela não busca os valores depois dessa data

Windows("Controle  Sracp - Devoluções 2015 .xlsm").Activate


i = 4
While Sheets("Devolução").Cells(i, 1) <> ""
i = i + 1
Wend

i = i - 1
ultimo_dia = Sheets("Devolução").Cells(i, 1)

ultimo_dia = ">" & ultimo_dia

Creio que o problema está no formato de data, que o VB acaba compreendendo no formato americano (mm/dd/aa) e então o filtro errado dependendo da data da célula, pois ele vai entender, por exemplo, 05/03/2015 como 03/05/2015.

Experimente converter para tipo Long na hora que alimentar a variável, que acho que dá certo, desde que ultimo_dia não esteja declarado como Date (qualquer coisa declare como variant):

Windows("Controle  Sracp - Devoluções 2015 .xlsm").Activate

i = 4
While Sheets("Devolução").Cells(i, 1) <> ""
i = i + 1
Wend

i = i - 1
ultimo_dia = clng(Sheets("Devolução").Cells(i, 1))

ultimo_dia = ">" & ultimo_dia