how to automatically download info from yahoo finance into excel
 

I want to have excel automatically go out and download information
from yahoo finance on a daily basis. I'm an excel user with no
programing experience. Is there a kb article or other source of
detailed instruction on how to achieve this goal.

Thanks for you help.
pm.

how to automatically download info from yahoo finance into excel
 

Hi Pete,
Below is the macro :
Sub GetYQuotes()
Base01 = "http://finance.yahoo.com/d/quotes.csv?s="
Base02 = "&f=sl1d1t1c1ohgv&e=.csv"
sURL = ""
SymString = ""

LastRow = Cells(65536, 1).End(xlUp).Row

For i = 1 To LastRow
SymString = SymString & Cells(i, 1) & " "
Next i
sURL = Base01 & SymString & Base02
Workbooks.Open sURL
Set rngSource = Cells(1).CurrentRegion
x = rngSource.Rows.Count
y = rngSource.Columns.Count
With ThisWorkbook.Sheets(1)
Set rngDest = Range(.Cells(1, 1), .Cells(x, y))
End With
rngDest.Value = rngSource.Value
ActiveWorkbook.Close SaveChanges:=False
End Sub

You have to arrange your worksheet with no titles in row 1 and using
column A to type in your symbols
ORCL for Oracle, GE for General Electric ...

HTH
Cheers
Carim

how to automatically download info from yahoo finance into excel
 

Hi Pete,
Below is the macro :
Sub GetYQuotes()
Base01 = "http://finance.yahoo.com/d/quotes.csv?s="
Base02 = "&f=sl1d1t1c1ohgv&e=.csv"
sURL = ""
SymString = ""

LastRow = Cells(65536, 1).End(xlUp).Row


For i = 1 To LastRow
SymString = SymString & Cells(i, 1) & " "
Next i
sURL = Base01 & SymString & Base02
Workbooks.Open sURL
Set rngSource = Cells(1).CurrentRegion
x = rngSource.Rows.Count
y = rngSource.Columns.Count
With ThisWorkbook.Sheets(1)
Set rngDest = Range(.Cells(1, 1), .Cells(x, y))
End With
rngDest.Value = rngSource.Value
ActiveWorkbook.Close SaveChanges:=False
End Sub


You have to arrange your worksheet with no titles in row 1 and using
column A to type in your symbols
ORCL for Oracle, GE for General Electric ...


HTH
Cheers
Carim


--
Carim
------------------------------------------------------------------------
Carim's Profile: http://www.excelforum.com/member.php...o&userid=33259
View this thread: http://www.excelforum.com/showthread...hreadid=532999