郵便局のサイトからデータをダウンロードしてきて、それをvlookupするという方法です。 この方法で十分なのですが、すべての郵便番号をダウンロードするのが面倒ですよね。 必要な分だけにしていると、遠方から引っ越し予定の人の住所が取得できません。 それぐらい手打ちすればいいのですが、完全自動にしたい!!!という気持ちで新しい方法に挑戦しました。 今回はVBAで「GetAddress」関数を作ります。 郵便局が提供するAPIを通して郵便番号から住所を取得します。 「Alt+F11」でVBEを起動し、標準モジュールを追加します。 Option Explicit Function GetAddress(zipcode As String) As String Dim apiUrl As String Dim xmlhttp As Object Dim json As Object Dim resu
![郵便番号から住所を取得する! ※全文無料|mei](https://cdn-ak-scissors.b.st-hatena.com/image/square/be743565e654b5e9b8a42700a521dd162eb15fde/height=288;version=1;width=512/https%3A%2F%2Fassets.st-note.com%2Fproduction%2Fuploads%2Fimages%2F100762661%2Frectangle_large_type_2_d554539f8bdef36462cf107c47eecf04.png%3Ffit%3Dbounds%26quality%3D85%26width%3D1280)