Eu estou no processo de fazer um programa que eu escrevi usando o excel vba mais rápido.

O programa baixa os dados do mercado de ações do asx.

Quero obter dados de dois URLs:

MEU CÓDIGO

url2 = "http://ichart.finance.yahoo.com/table.txt?s=bhp.ax"

Set XMLHTTP = CreateObject("WinHttp.WinHttpRequest.5.1")

XMLHTTP.Open "GET", url2, False

XMLHTTP.send

result = XMLHTTP.responseText

ActiveCell.Value = result

Set XMLHTTP = Nothing

URL 1. http://ichart.finance.yahoo.com/table.txt?s=bhp.ax

MEU PROBLEMA.

Este arquivo é muito grande. Pensei que poderia simplesmente armazenar o resultado dessas solicitações http e imprimi-lo na janela de depuração ou diretamente em uma célula. No entanto, esses métodos parecem estar cortando partes dos dados?

se eu baixar o arquivo txt do url 2 no notepad ++ ele tem quase 200 000 caracteres mas o excel tem entre 3 -5 000. Qual é a melhor maneira de lidar com esses pedidos para que todos os dados sejam capturados e eu possa analisar tudo mais tarde?

URL 2. do primeiro URL Eu quero apenas os dados JSON que resultam da consulta YQL.

MEU PROBLEMA

Não tenho certeza de como obter apenas os dados json quando você segue o link abaixo e como armazená-los para que o problema ocorrido com a URL 1 (dados ausentes) não ocorra.

http://developer.yahoo.com/yql/console/?q=select%20symbol%2C%20ChangeRealtime%20from%20yahoo.finance.quotes%20where%20symbol%20in%20%28%22YHOO%22%2C%22AAPL % 22% 2C% 22GOOG% 22% 2C% 22MSFT% 22% 29% 20 |% 20sort% 28field% 3D% 22Alterar tempo real% 22% 2C% 20descendente% 3D% 22true% 22% 29% 0A% 09% 09 & env = http% 3A% 2F% 2Fdatatables.org% 2Falltables.env # h = selecione% 20*% 20from% 20yahoo.finance.quotes% 20where% 20symbol% ​​20in% 20% 28% 22bhp.ax% 22% 29

Muito obrigado, Josh.