Excel vba solicitud de http descarga datos de yahoo finance

Estoy en el proceso de hacer un programa que escribí usando excel vba más rápido.

El programa descarga datos del mercado de valores desde el asx.

Quiero obtener datos de 2 urls:

MI 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

MI PROBLEMA.

Este archivo es muy grande. Pensé que simplemente podría almacenar el resultado de estas solicitudes http e imprimirlo en la ventana de depuración o directamente en una celda. Sin embargo, estos métodos parecen estar cortando partes de los datos?

si descargo el archivo txt de url 2 en notepad ++ tiene casi 200 000 caracteres pero es excelente entre 3 y 5 000. ¿Cuál es la mejor manera de manejar estas solicitudes para que se capturen todos los datos y pueda analizarlos todos? ¿luego?

URL 2. Desde la primera URL solo quiero los datos JSON que resultan de la consulta YQL.

MI PROBLEMA

No estoy seguro de cómo obtener solo los datos json cuando sigue el enlace a continuación, y o cómo almacenarlo para que no se produzca el problema con la URL 1 (datos faltantes).

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 |% 20field% 28field% 3D% 22ChangeRealtime% 22% 2C% 20descending% 3D% 22tue% 22% 29% 0A% 09% 09 y env = http% 3A% 2F% 2Fdatatables.org% 2Falltables.env # h = seleccione% 20*% 20from% 20yahoo.finance.quotes% 20where% 20symbol% ​​20in% 20% 28% 22bhp.ax% 22% 29

Muchas gracias, Josh.

Respuestas a la pregunta(2)

Su respuesta a la pregunta