Yahoo Stock Price Data / Limited version

**fred3** · 08-19-2014, 03:19 PM

I have a VBA module that will pull multi-day HISTORICAL stock numbers from Yahoo and put them in a worksheet in table form by date. It's working fine.
It clears the data in the worksheet each time it gets ready to reload it.

What I'd like to do is put TODAY's current numbers Date / Open / High / Low / Current Price / Volume
in the next row (which is now empty).

So, in pseudo code:
Get todays numbers
Put them in lRowLast+1, cols A:F

Where iRowLast is known.

I can imagine editing the sub that I have to get this done but it's going to be more work than I think is warranted.
So, I ask.
Perhaps code that would do this or nearly do this is already lurking out there....

Thanks

**TMS** · 08-19-2014, 03:48 PM

If you've got code that gets the data you require but clears the current data, it shouldn't be that hard to stop it clearing the old stuff and work out where to put the new stuff.

I suggest you post the code, ideally in its parent workbook.

Regards, TMS

**fred3** · 08-19-2014, 06:18 PM

Please Login or Register  to view this content.

This runs from a separate workbook and brings the data into the Data sheet of the target workbook. Driver and Model sheets are in that same target workbook.

It seems to me that an easy way to do this would be to bring today's data into a separate sheet "Today" and then link the appropriate cells into the sheet "Data". In this case that should work fine.
It appears that the Yahoo codes would have to change to bring in today's rather than historical data..... but I should be able to do that.