Home |
Search |
Today's Posts |
#1
|
|||
|
|||
Dowloading internet data to worksheet form a ".ccv" file
I am download stock data with the following code.
Set shFirstQtr = Workbooks(1).Worksheets(2) Set qtQtrResults = shFirstQtr.QueryTables _ .Add(Connection:="URL;http://finance.yahoo.com/d/quotes.csv?s=" & Left(SymbolString, Len(SymbolString) - 1) & "&f=l1vb3b2ogha2&e=.csv", _ Destination:=shFirstQtr.Cells(2, 2)) With qtQtrResults .TextFileParseType = xlDelimited .TextFileCommaDelimiter = True .WebFormatting = xlRTF .Refresh End With The problem is that all 8 data items are piled into one column. The data is comma delimited. I can manually, using the Data optioon and the Text to columns , move the data to columns but I need to able to it programmatically, Any help will be appreciated. Duane |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Expand/Collapse Grouped Data in Protected Worksheet | Excel Discussion (Misc queries) | |||
Search/Match between 2 x separate Worksheets and populate result in third worksheet | Excel Discussion (Misc queries) | |||
Weekly Transaction Processing | Excel Worksheet Functions | |||
Pulling data from 1 sheet to another | Excel Worksheet Functions | |||
URGENT Please... new worksheet with copied formats but no data. | Excel Worksheet Functions |