2017-06-25 18 views
0

私はライブ株式市場の価格を監視するためのBloombergのランチパッドのような種類の小さなExcelシートを作成したいと思います。これまでの利用可能な無料のデータソースのうち、私はGoogleファイナンスが必要な取引所のリストに対してリアルタイムの価格を提供していることがわかりました。 Googleの財務に関する問題は、既に財務APIを閉鎖していることです。私はプログラム的に私が下の図で円で囲んだ実際の価格を取得して、それを私のExcelに反映させる手助けをする方法を探しています。クロールリアルタイムGoogleの財務価格

enter image description here

私の周りを検索し、現在のように無駄にされています。私はここにいくつかの投稿: How does Google Finance update stock prices?を読んでいますが、答えに示唆されている方法は、必要なライブ更新価格の部分ではなく、チャートの時系列データを取得する方法を示しています。私はクロムの検査でウェブページのネットワーク通信を調べており、必要なリアルタイム価格の一部を返す要求は見つけられませんでした。どんな助けでも大歓迎です。いくつかのサンプルコード(VBA以外の言語でも可能)は非常に有益です。みんな、ありがとう !

答えて

0

これを行うには、VBA、VB、C#R、Pythonなどさまざまな方法があります。以下は、Yahoo financeから統計をダウンロードする方法です。

Sub DownloadData() 

Set ie = CreateObject("InternetExplorer.application") 

With ie 
    .Visible = True 
    .navigate "https://finance.yahoo.com/quote/AAPL/key-statistics?p=AAPL" 

' Wait for the page to fully load; you can't do anything if the page is not fully loaded 
Do While .Busy Or _ 
    .readyState <> 4 
    DoEvents 
Loop 

'ダウンロードするデータ要素への参照を設定します。 'td'データ要素または 'tr'データ要素のいずれかをダウンロードできます。このサイトは 'tr'データ要素を使用します。 のMsgBox( "完了!!")

End Subの

で セットリンク= ie.document.getElementsByTagName( "TR") 行カウント= 1

' Scrape out the innertext of each 'tr' element. 
With Sheets("DataSheet") 
    For Each lnk In Links 
     .Range("A" & RowCount) = lnk.innerText 
     RowCount = RowCount + 1 
    Next 
End With 

終わり、私はそれを残します同じことをする他のテクノロジーを見つけることができます。たとえば、RとPrthonはまったく同じことをすることができますが、スクリプトはこの種の作業を行うVBAスクリプトとは少し異なります。