I have written the code below in a loop that opens various web pages on
the company intranet:

sISIN = rCell.Value

Set wbksource = Workbooks.Open(Filename:= _
"http://structuredproducts/en/searchResults.do?IDENT=" &
sISIN)

....

wbksource.Close False

My issue is that the time taken to open each file in each iteration is
vastly different. At some times each iteration takes about 5 seconds,
at others times it takes, well too long to wait. There is other code
in the loop but this executes in the blink of an eye, the delaying
factor is opening the web page.

Can anyonr suggest why this is happening (or may another group that
might be better served considering this matter)

PWS