毎年2回、お中元とお歳暮シーズンにお世話になるのが「Google Static Maps」:-)
[Static Maps API v2—google]5年前、配達効率を上げる為、趣味と実益を兼ねてAccessVBAで「住所録2配達先マップ」を作成。シーズンの度に改良を加え、それなりに完成度が上がってきたと自負していました。
でも、あれ動かない!😮
先日、2013年の中元申込みエクセルが届き、半年ぶりに動かすと地図が出ない。
原因を調べると、2012年歳暮商戦から2013年中元商戦の間で「Google Static Maps API Ver.1」のサポートが終了していたそうな・・・
動かなくなったver1のimgタグのsrc:
http://maps.google.com/staticmap?center=39.08284,1304.63262033262&zoom=16&size=640x640&format=jpg&maptype=mobile &markers= 3133.8574584718,134.62572,bluef| 33.86641814084,134.62262,red0| 332.8638613,134.62267,yellowy| 333.8300u083,134.62107,blackw| 334.83u7454,134.621161,purples| 353.83jh7484,134.622489,orange5| &key=MAPS_API_KEY&sensor=false"
ver2用の書き直すと地図が出た!
http://maps.googleapis.com/<b>maps/api/staticmap</b>?center=345.84858284,130.622558162&zoom=16&size=640x640&format=jpg&maptype=mobile &markers= <b>color:blue%7Clabel:F%7C</b>3h3.5h50173,134.6252 &markers= color:red%7Clabel:S%7C363.84104,134.68462 &markers= color:black%7Clabel:W%7C33.81,134.6226639277 &markers= color:blue%7Clabel:G%7C373.83003,13h4.6251899 &markers= color:blue%7Clabel:T%7C33.8374,13hg4.62126161 &markers= color:blue%7Clabel:7%7C33.84164,13f4.624999 &sensor=false"
さてと原因が分かったので、早速VBAをver1→ver2へ書きなおさねば(やれやれ) 🙁
追加:
あれ、VBAをver2用に書き換えても地図が出ない!間違ったところは無いんだけどな・・・・
試行錯誤の結果原因判明。
ver1では最大62個までマークが付けることが出来たのに、ver2では36個に減らされている。
最大マーク数を減らしようやく地図が出た 🙂