Consulta Web Excede Tiempo

Hola gente!

Estoy realizando una consulta web desde visual basic en Excel. El
porblema es que la consulta lleva su tiempo en ejecutarse y se debe
exceder el límite de la conexión de la request http.

La consulta no se puede reducir más, además si se ejecuta en el TOAD
no hay problemas de pérdidas de conexión con el JDBC y devuelve los
datos correctamente.
La consulta devuelve un CLOB que lo almacena en sesion.
Posteriormente se realizaria una segunda consulta para obtener el CLOB
de session... pero esto no llega a ejecutarse porque da el error antes
en el cliente EXCEL en la línea:

.Refresh BackgroundQuery:=False

¿Alguién sabe alguna solución?
Si no tengo mal entendido el tiempo de conexión http es un parámetro
del registro de las máquinas locales... de todas formas, esta solucion
no me vale porque habria que estar configurando las máquinas de
tooooodo el personal de una empresa... ufff esto no cuela como
solución!


La forma de la consulta web es:


query_string="URL;https://UNA_DIRECCCION_WEB"
NB_HOJA4="Hoja1"

With Sheets(NB_HOJA4).QueryTables.Add(Connection:=query_string,
Destination:=Sheets(NB_HOJA4).Range("A1"))
.name = "Hay_XML"
.FieldNames = True
.RowNumbers = False
.FillAdjacentFormulas = False
.PreserveFormatting = True
.RefreshOnFileOpen = False
.BackgroundQuery = False '
.RefreshStyle = xlOverwriteCells
.SavePassword = False
.SaveData = False
.AdjustColumnWidth = False
.RefreshPeriod = 0
.WebSelectionType = xlAllTables
.WebFormatting = xlWebFormattingNone
.WebPreFormattedTextToColumns = True
.WebConsecutiveDelimitersAsOne = True
.WebSingleBlockTextImport = False
.WebDisableDateRecognition = False
.EnableEditing = False
.Refresh BackgroundQuery:=False
End With
my_queryname = Sheets(NB_HOJA4).QueryTables(1).name
Sheets(NB_HOJA4).Names(my_queryname).Delete


Gracias por adelantado me urge bastante.