Excel 2013에서 주가를 어떻게 다운로드합니까? Google 문서의 GoogleFinance 스프레드 시트 기능과 동등한 기능이 있습니까? “price”) 주식의 최신 가격을 다운로드합니다. Excel

Google 문서 스프레드 시트에서이 셀 수식을 사용할 수 있습니다.

=GoogleFinance("GOOG", "price")

주식의 최신 가격을 다운로드합니다. Excel 2013에 동등한 기능이 있습니까?

이전 버전의 Excel에는 각 시세 표시기 (실제로 가격이 필요한 경우 너무 많은 데이터)에 대해 많은 양의 데이터를 다운로드 하는 스마트 태그 기능 이 있었으며 Excel 2013 용 Bing Finance 앱 을 제안하는 소스를 보았습니다 . 이것은 중단되었습니다.

이를 수행하는 간단한 방법이 있습니까? 문자 그대로 가장 최근의 가격이 필요하며 지연되거나 야후 파이낸스 등에서 오는 경우 상관 없습니다. 아마도 VBA 코드를 작성하여 YF에서 CSV 파일을 다운로드하고 구문 분석하는 등의 작업을 할 수 있습니다. 매크로 사용 통합 문서를 만들지 않기를 바라고 있습니다.



답변

다음과 같이 UDF를 사용할 수 있습니다.

Option Explicit

Public Function GetTickerPrice(ByVal ticker As String) As Double

    Dim IE As Object
    Dim pageData As Object

    Set IE = CreateObject("InternetExplorer.Application")
    Dim URL As String
    URL = "http://www.msn.com/en-us/money/stockdetails/fi-126.1." & ticker & ".NAS?symbol=" & ticker & "=PRFIMQ"

    IE.Navigate URL

     Do Until IE.ReadyState >= 4
            DoEvents
     Loop

     Application.Wait Now + TimeSerial(0, 0, 5)

     Set pageData = IE.document

     GetTickerPrice = pageData.getElementsByClassName("precurrentvalue")(0).innertext

     Set IE = Nothing
     Set pageData = Nothing
End Function

이제 GetTickerPrice("GOOG")현재 가격을 사용 하고 얻을 수 있습니다 .


나는 이것을 약간의 입력 을 위해 Codereview.SE 로 가져 갔다 .


답변

현재 Office Store 에는 4 개의 주식 앱이 있습니다 . 그들 중 두 사람은 무료입니다 :

스톡 커넥터

스톡 타일


답변

이 작업을 수행하고 2013 년 버전의 Excel 2013 용 주식 시세 추가 기능 이라는 추가 기능 이 있습니다. 개인적으로 작동시킬 수는 없었지만 몇 년 동안 사용되어 왔기 때문에 아마도 나일 것입니다. .