Este fórum está sendo desativado

[CMagalha]

Boa tarde

Tenho um sistema automatico de coleta de dados do Yahoo Finance, usando VBA, que funciona há vários anos.
Aparentemente o Yahoo trocou o formato da "query" que obtém os dados que necessito, passando para:

http://finance.yahoo.com/quote/[b]CCA[/b]/history?period1=1289181600&
period2=1478570400&interval=1d&filter=history&frequency=1d

(não há espaço entre as linhas mostradas acima, sendo um string só)

Sendo que "CCA" é o papel da Bolsa de NY que desejo consultar.

Eles converteram a data inicial, que indiquei como 08/11/2010 para o string 1289181600

e a data final de 08/11/2016 no string 1478570400

Meu problema, para compor esse string de consulta no VBA, com datas variáveis, é que não encontro uma maneira de formatar a data para chegar no string mostrado.

Seriam segundos desde 01/01/1900 (a data inicial do Excel) ?

Ou alguma outra coisa ?

Agradeço comentários.

[laennder]

Está num formato chamado TIMESTAMP. É a diferença em segundos para o dia 1/1/1970. Percebi que para os valores baterem com os dados que você informou, existia uma defasagem de 2 horas.

Criei uma fórmula para conversão. A1 é a data que deseja converter.

Código: Selecionar todos

=(A1+2/24-DATA(1970;1;1))*86400

[CMagalha]

Muito grato !!

Vou testar e tentar inserir no meu VBA.
Depois volto.

[CMagalha]

laennder

Muito obrigado !!

Realmente funcionou. Excelente !