json - 新しい API v1.1 でツイート検索を Excel に取り込みます

Question

ツイート検索を Excel に取り込む方法は、RSS を使用する xml URL からデータをインポートするだけでした。ただし、Twitter は RSS のサポートを削除しているため、更新を押したときに更新できる Excel に Twitter フィードを取得する方法に困惑しています。ここでの問題は、プログラミングの知識がほとんどないため、この新しい認証コードに問題があることです。VBA を使用して json 形式でデータを取得し (xml もサポートしていません)、Excel に変換する方法を知りたいです。

Answer 1

これについては、一度ブログ記事で説明しました。詳細はこちら: JSON APIs in Excel .

基本的に、この JSON VBA ライブラリを使用してこのコードを実行しました。

Dim DistCache As New Scripting.Dictionary

Function CalculateDistance(startAddress As String, endAddress As String)
  Dim key As String
  key = startAddress & "|" & endAddress

  If DistCache.Exists(key) Then
    v = DistCache(key)
  Else
    Dim request As New SyncWebRequest
    request.AjaxGet ("http://maps.googleapis.com/maps/api/directions/json?origin=" & startAddress & "&destination=" & endAddress & "&sensor=false")
    Dim json As String
    json = request.Response

    Dim parser As New JSONLib
    Set result = parser.parse(json)
    Set routes = result("routes")
    Set route = routes(1)
    Set legs = route("legs")
    Set leg = legs(1)
    Set dist = leg("distance")
    v = dist("value")
    DistCache(key) = v
  End If

  CalculateDistance = v
End Function

キャッシュはかなり悪いですが、同じ Web クエリを 2 回実行しないことを意味します。これをTwitterの質問に適応させていただければ幸いです。

Answer 2

JSON を Excel に解析する方法については、sourceを参照してください。ＧＬ！