Mark...Since you haven't provided the url, I'm not exactly sure what you're trying to do. But perhaps the following construction can achieve what you want in a much faster and more economical fashion than using the query method...Ron

Note: IE-Tools-Internet Options-Security-Internet-Custom Level-Miscellaneous-set "Access data sources across domains" to "Enable" to prevent "Access Denied" errors.

Sub Test()
my_url = "http://www.your_url.com"
Set my_obj = CreateObject("MSXML2.XMLHTTP")
my_obj.Open "GET", my_url, False
my_obj.send
my_var = my_obj.responsetext
Set my_obj = Nothing
' now you can use "instr" and "mid" to extract the information you
' want from the source code which is contained in my_var

End Sub