[記事数: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
Word 2つの文書を比較して差分を表示 Wordにも、2つの文書を比較して差分を教えてくれる機能があった! 2つのファイルを差分比較するのに何を使っていますか? WordにもDiff(ファイル比較)ソフトと同等の機能が備わっているんです! 複数ファイルのテキスト内容を横並びに表示し、隣のファイルと比較して相違がある箇所を教えてくれ...
Excel関数 住所録の建物名を分ける方法... 東京都六王子市海山川町88-888青空荘88号室 などとなっています。 これを、 C列に 東京都六王子市海山川町88-888 D列に 青空荘88号室 と分けたいのですが、よい方法を教えて下さい。 住所の番地には、「丁目」「番地」「号」などは入らず、 すべて半...
Google画像検索結果のファイルを一括ダウンロードするソフト... Google画像検索結果のファイルを一括ダウンロードするソフトです。 フリーソフトです。Excelで動作します。 Goolge(グーグル)画像検索の結果に表示されるすべての元画像ファイル(原寸大)を一括してダウンロード保存します。 画像を保存するフォルダーは、本ワークブックと同じフ...
Excel 重複データチェックを条件付き書式でおこなう方法... 下の図のようなデータがあって、重複データを削除したい場合、重複データの削除のページでご紹介している方法で、簡単に削除できます。 でも、この重複データの削除は、データを削除する前に、どのデータが重複しているのかを確認することができません。 そこで、どのデータが重複データなのかを確認した...
マクロVBA 連続数値を入れる 連続数値を入れる|Excelマクロの記録で覚えるVBA 数式の結果を値として取得する エクセルVBAについて数式の結果を値として取得するコードはあります... - Yahoo!知恵袋 =WEBSERVICE($C$3&C14&$C$6&$C$5&...
Snazzy Maps – Googleマップのデザインを変更してオシャレに... Snazzy Maps - Free Styles for Google Maps グレースタイル Souldisco - Snazzy Maps - Free Styles for Google Maps Light Bl...
AmazonのランキングRSS こちらのベストセラーページの左側にあるカテゴリ別にRSSが用意されており、さらにこのカテゴリは細分化されているため欲しいジャンルのRSSを知ることができます。 さらに上側のメニューバーに「ベストセラー」、「新着ニューリリース」、「ヒット商品」、「一番ほしい物リストに追加されている商品」...
Excel SUBSTITUTE関数で指定した文字を他の文字に置き換える方法 2 番目だけの置き換え... SUBSTITUTE関数の使い方 Excel(エクセル)のSUBSTITUTE関数は、文字列中の指定した文字を他の文字に置き換えます。 できること 他の文字に置き換える Excelの対応バージョン Excel2...
エクセルのデータを2段組みで印刷したい場合は、編集はエクセルで、印刷はワードで行う... エクセルのデータを2段組みで印刷したい場合は、編集はエクセルで、印刷はワードで行うのがお勧めです。 エクセルのデータ範囲を(今後のデータの追加に対応できるように少し大きめに)選択し、右クリック「コピー」、ワードで新規文書を開き、ページレイアウトタブの段組みから2段を選択しておき、右クリック「形...
Excel IF関数で、あいまいな条件(……を含む)の指定をするには... のなかにExcelという文字列を含めば、○を含まなければ、何も表示しないという式を入力 B2セルに入力するCOUNTIFの式は、 COUNTIF(B2,"*Excel*") これをIF関数の書式にネスト(入れ子)します。 数式 =IF(COUNTIF(範囲,条件),真の場合,偽の場合) ...




コメントを残す