Hi, I have a web query in Excel which gathers data from a single table on a web page.
When the data is returned it is inserted into excel over 7 rows, is there a way to format the returned data so that it is spread out on just 1 row?
The code i have so far is...
Thanks
Pete
When the data is returned it is inserted into excel over 7 rows, is there a way to format the returned data so that it is spread out on just 1 row?
The code i have so far is...
Code:
Range("I1").Select
With ActiveSheet.QueryTables.Add(Connection:= _
"URL;[URL unfurl="true"]http://www.yell.com/search/DoSearch?state=INI&screen=VAL&companyName=Electrotech[/URL] Solutions&location=B77 1AG" _
, Destination:=Range("I1"))
.Name = _
"DoSearch?state=INI&screen=VAL&companyName=Electrotech Solutions&location=B77 1AG"
.FieldNames = True
.RowNumbers = False
.FillAdjacentFormulas = False
.PreserveFormatting = True
.RefreshOnFileOpen = False
.BackgroundQuery = True
.RefreshStyle = xlInsertDeleteCells
.SavePassword = False
.SaveData = True
.AdjustColumnWidth = False
.RefreshPeriod = 0
.WebSelectionType = xlSpecifiedTables
.WebFormatting = xlWebFormattingNone
.WebTables = "13"
.WebPreFormattedTextToColumns = True
.WebConsecutiveDelimitersAsOne = True
.WebSingleBlockTextImport = True
.WebDisableDateRecognition = False
.Refresh BackgroundQuery:=False
End With
Thanks
Pete