LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Old April 24th 05, 08:24 PM
Duane L Kibby
Posts: n/a
Default 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;" &
Left(SymbolString, Len(SymbolString) - 1) & "&f=l1vb3b2ogha2&e=.csv", _
Destination:=shFirstQtr.Cells(2, 2))
With qtQtrResults
.TextFileParseType = xlDelimited
.TextFileCommaDelimiter = True

.WebFormatting = xlRTF
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.


Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On

Similar Threads
Thread Thread Starter Forum Replies Last Post
Expand/Collapse Grouped Data in Protected Worksheet Robert Slattery Excel Discussion (Misc queries) 8 November 24th 15 05:08 PM
Search/Match between 2 x separate Worksheets and populate result in third worksheet Alan Bartley Excel Discussion (Misc queries) 1 April 11th 05 05:21 AM
Weekly Transaction Processing Ralph Howarth Excel Worksheet Functions 4 January 19th 05 05:37 AM
Pulling data from 1 sheet to another Dave1155 Excel Worksheet Functions 1 January 12th 05 05:55 PM
URGENT Please... new worksheet with copied formats but no data. DarrellK Excel Worksheet Functions 2 December 1st 04 07:11 PM

All times are GMT +1. The time now is 11:02 PM.

Powered by vBulletin® Copyright ©2000 - 2020, Jelsoft Enterprises Ltd.
Copyright 2004-2020 ExcelBanter.
The comments are property of their posters.

About Us

"It's about Microsoft Excel"


Copyright © 2017