where did you get the data formerly? Could you paste the link here?

I have seen the same issue with the Google Finance and I cannot get any historical data since Sept. 5. It could be a temporary glitch, at least I hope so since I have not heard any thing in the news so far. The historical data tab used to be along other ones on the left hand site on the google finance page but the tab is missing. I used to get data from Yahoo but unfortunately it was stopped with no notification.

@ Thomas C - I'm currently using the following macro to import data into Excel, which stopped provided historical data past 9/5/17. See link and code below.

Thanks.
====================================

Sub GetData()
Dim DataSheet As Worksheet
Dim EndDate As Date
Dim StartDate As Date
Dim Symbol As String
Dim qurl As String
Dim nQuery As Name
Dim LastRow As Integer

Application.ScreenUpdating = False
Application.DisplayAlerts = False
Application.Calculation = xlCalculationManual

Sheets("Data").Cells.Clear

Set DataSheet = ActiveSheet

StartDate = DataSheet.Range("startDate").Value
EndDate = DataSheet.Range("endDate").Value
Symbol = DataSheet.Range("ticker").Value
Sheets("Data").Range("a1").CurrentRegion.ClearContents

qurl = "http://finance.google.com/finance/historical?q=" & Symbol
qurl = qurl & "&startdate=" & MonthName(Month(StartDate), True) & _
"+" & Day(StartDate) & "+" & Year(StartDate) & _
"&enddate=" & MonthName(Month(EndDate), True) & _
"+" & Day(EndDate) & "+" & Year(EndDate) & "&output=csv"

QueryQuote:
With Sheets("Data").QueryTables.Add(Connection:="URL;" & qurl, Destination:=Sheets("Data").Range("a1"))
.BackgroundQuery = True
.TablesOnlyFromHTML = False
.Refresh BackgroundQuery:=False
.SaveData = True
End With

Sheets("Data").Range("a1").CurrentRegion.TextToColumns Destination:=Sheets("Data").Range("a1"), DataType:=xlDelimited, _
TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True, _
Semicolon:=False, Comma:=True, Space:=False, other:=False

Sheets("Data").Columns("A:G").ColumnWidth = 12

LastRow = Sheets("Data").UsedRange.Row - 2 + Sheets("Data").UsedRange.Rows.Count

Sheets("Data").Sort.SortFields.Add Key:=Range("A2:A" & LastRow), _
SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal

Application.Calculation = xlCalculationAutomatic

With Sheets("Data").Sort
.SetRange Range("A1:G" & LastRow)
.Header = xlYes
.MatchCase = False
.Orientation = xlTopToBottom
.SortMethod = xlPinYin
.Apply
.SortFields.Clear
End With

End Sub

Looks like it's working again now.

VBA?

@ Thomas C: VBA = Visual Basic for Applications, which is used with Excel macros. If you want to send me a message directly I can send you a link for the Excel file with built-in macro that retrieves stock data from Google Finance.

Troy

@Troy,

I've sent you a message with my email-address.

Many thanks!

Thomas - For some reason I'm not receiving messages through my Quantopian account. I've sent you a direct message with the info. If you didn't receive it, please let me know and we'll work something else out.

Thanks,

Troy

Hi Troy,

I receive your message. Many thanks!

Thomas

AssetMacro.com API provides free access to historical data for 120,000+ Financial Securities (Stocks, Bonds, Commodities, Currencies, Credit Default Swaps, Indices) and Macroeconomic Variables for 120 countries.

I notice that both Google and Yahoo has changed their Finance pages. I find they are now very "ugly". Their former are much better. Not sure if they will save money? Or there are much more alternatives now?

@Phil Zav

Have you ever tried the Python API of AssetMacro.com?