wish of those help Based on the documentation you provided for the API, the data you are looking for is not available in the Yahoo Finance API. Because Yahoo does not make this data available, you actually need to find a different API to work with instead of trying to solve the problem via VBA. Somebody else on StackOverflow seems to have had the same challenge (getting the Next Earnings Date data). Here's the thread: Free API or similar to get Next Earnings Date for stocks
With these it helps Calling your function from a Sub instead of from the worksheet will give you a better idea of what's going wrong. In this case the error is "Type Mismatch" on the line:
StockQuote = http.responseText
Function StockQuote(ByVal ticker As String) As Double
Dim url As String
Dim lastDate As Double
Dim http As Object, rv
url = "http://download.finance.yahoo.com/d/quotes.csv?s=" & ticker & "&f=d1"
Set http = CreateObject("MSXML2.XMLHTTP")
http.Open "GET", url, False
rv = http.responseText
StockQuote = CDate(Trim(Replace(rv, """", "")))
Set http = Nothing
406 when trying to query finance.yahoo.com/webservice (Yahoo Finance) through jQuery
it helps some times your formula was using numbervalue to convert text to a number, but market capitalization includes a B at the end of the number so it couldn't convert that to a number. Any data that is text just simply remove the numbervalue function and leave only the webservice function.
How do you get a text box that becomes a pull down menu like in Yahoo Finance "Get Quotes"?