[記事数:1,202] 日本を元気にするキーワード、地域活性化×中小企業× ITのTips and Quotes(秘訣と引用文)
creative  link  memo 

緯度経度から住所を取得するExcel VBA



以下のコードを標準モジュールに貼り付けて、シートを表示した状態で set_address サブルーチンを実行してください。

Google Geocoding API のリバース ジオコーディングというのを使いました。
Google Maps Geocoding API | Google Maps Geocoding API | Google Developers

API は、呼び出し回数の制限があります。
https://developers.google.com/maps/documentation/geocoding/usage-limits?hl=ja
50回/秒、2,500回/日です。

なので、5000件かそこらあるようなので、すべて取得するには 2~3日ほどかかります。

1秒当たりの回数制限に引っかかった場合には、2秒待って、1回だけリトライをするようにしました。
リトライでも取得できない場合、もしくは、他のエラーが出た場合には、C 列のセルに “ERROR” で始まる文字列を書き込んでいます。

エラーが連続して 2行続くと、そこで行方向の処理を中断します。
1日の呼び出し回数制限に引っかかったときに、無駄な呼び出しをしないためです。

一日の利用回数の制限もありますし、それなりに遅いので、繰り返して実行できるようにしています。
C 列が空の場合、もしくは “ERROR” で始まる場合に住所を検索に行きます。

一回動かすと、2,500件くらいを処理できるはずで、最後の方が “ERROR : OVER_QUERY_LIMIT ~” というセルがふたつあると思います。
一日待ってから もう一度 動かすと、続きから処理を行います。

住所の候補は複数が返されるのですが、先頭のものを使っています。
C 列に入れる住所は、API の応答にある値をそのまま使っています。
「日本」が入ったり、郵便番号があったりしますので、加工したいと言われそうな気もしてます :-)

ここではYahoo!デベロッパーネットワークで公開されている地図サービス(YOLP)のリバースジオコーダAPIを用います。





FavoriteLoadingお気に入りAdd to favorites
Excel VBA Wikipediaからタイトル、本文のダイジェスト、Wikipediaへのリンク... はじめに 今回は、インターネット上の百科事典「Wikipedia」をExcelから利用してみます。ブラウザの画面では情報が多すぎますが、APIを使うことにより、要約されたテキストとして取得できるので、用語一覧などを作る際にも便利です。動作確認は、Windows 7、Excel 20...
ExcelVBA 住所から緯度・経度→最寄駅、路線情報、距離、時間取得... 住所 名称から最寄駅等を取得するAdd Star VBA 下記のサイトのコードを少し変えて シートにある住所から最寄駅等の情報を作ってみました。 住所から最寄駅を検索する | ヴィーバ VeaBa! Excel VBA Tips http://veaba.keemoosof...
Excel 数字を4桁区切りで表示する方法... 「下4桁と下5桁の間に『,』という文字を挿入する」 という考え方に切り替えてみる。 ユーザー書式の中で、任意の文字を加えたい場合は、その文字の前後を"(ダブルクォーテーション)で挟むことによって「数字や演算記号ではなく文字列扱い」にすることができる。 つまり と書いて...
AmazonのランキングRSS こちらのベストセラーページの左側にあるカテゴリ別にRSSが用意されており、さらにこのカテゴリは細分化されているため欲しいジャンルのRSSを知ることができます。 さらに上側のメニューバーに「ベストセラー」、「新着ニューリリース」、「ヒット商品」、「一番ほしい物リストに追加されている商品」...
Excel ハイパーリンクのURLを別のセルに表示したい... 現在アクティブなシートのすべてのハイパーリンクのURL を 右隣のセルに書き出すマクロです。 マクロのセキュリティを中にしてエクセルを再起動する(ご利用のエクセルのバージョンに応じた方法で) ブックを開く ALT+F11でVBE画面を出す 挿入メニューから標準モジュールを挿入する 現れ...
Excel 重複データチェックを条件付き書式でおこなう方法... 下の図のようなデータがあって、重複データを削除したい場合、重複データの削除のページでご紹介している方法で、簡単に削除できます。 でも、この重複データの削除は、データを削除する前に、どのデータが重複しているのかを確認することができません。 そこで、どのデータが重複データなのかを確認した...
Excel SUBSTITUTE関数で指定した文字を他の文字に置き換える方法 2 番目だけの置き換え... SUBSTITUTE関数の使い方 Excel(エクセル)のSUBSTITUTE関数は、文字列中の指定した文字を他の文字に置き換えます。 できること 他の文字に置き換える Excelの対応バージョン Excel2...
エクセルのデータを2段組みで印刷したい場合は、編集はエクセルで、印刷はワードで行う... エクセルのデータを2段組みで印刷したい場合は、編集はエクセルで、印刷はワードで行うのがお勧めです。 エクセルのデータ範囲を(今後のデータの追加に対応できるように少し大きめに)選択し、右クリック「コピー」、ワードで新規文書を開き、ページレイアウトタブの段組みから2段を選択しておき、右クリック「形...
Google画像検索結果のファイルを一括ダウンロードするソフト... Google画像検索結果のファイルを一括ダウンロードするソフトです。 フリーソフトです。Excelで動作します。 Goolge(グーグル)画像検索の結果に表示されるすべての元画像ファイル(原寸大)を一括してダウンロード保存します。 画像を保存するフォルダーは、本ワークブックと同じフ...




コメントを残す