View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
SteveG[_2_] SteveG[_2_] is offline
external usenet poster
 
Posts: 10
Default .IQY loop in VBA?

I am using Excel 200 and XP. I have just learnt how to use an .iqy
file to extract data from the web. To really benefit from automation
I want to create a loop using slightly different web adresses each
time. I have recorded the query as a macro and get:

Sub Macro1()
With Selection.QueryTable
.Connection = "URL;http://www.skyscanner.net/gbp/flights/ABZ/
LTN"
.WebSelectionType = xlAllTables
.WebFormatting = xlWebFormattingAll
.WebPreFormattedTextToColumns = True
.WebConsecutiveDelimitersAsOne = True
.WebSingleBlockTextImport = False
.WebDisableDateRecognition = False
.Refresh BackgroundQuery:=False
End With
End Sub

Ok - so far so good. By varying ABZ and LTN in the web address I get a
different set of results.

I have a table containing these two variables in a 25R x 2C table
called 'sectors' on a separate sheet 'OAG'

How do I create a loop to work systematically down the 'sectors'
table, recording the inputs and creating an output for each input
pair?

The output data block is 11R x 7 C so I will have to jump 12 rows
before each loop unless there is a neat way to put the data into a
single row.

Any ideas?