複数個所から複数個所へ移動するときの時間を調べたくて、ネットで拾ったVBAを改変して使おうとしています。
しかし公共交通手段を使わせようとすると、鈍行を使った時の時間しか出ません。
なんとか新幹線に乗せようと思って検索したのですが、なかなかいい方法が見つかりません。
apiurlは以下のようなものを使っており、
https://maps.googleapis.com/maps/api/distancemat …東京駅&destinations=名古屋駅&sensor=false&mode=transit&language=ja&arrival_time=1512237600&key=YOUR_API_KEY
結果は以下のように帰ってきます。
<DistanceMatrixResponse>
<status>OK</status>
<origin_address>日本、〒100-0005 東京都千代田区丸の内1丁目</origin_address>
<destination_address>日本、愛知県名古屋市中村区名駅1丁目1−4</destination_address>
<row>
<element>
<status>OK</status>
<duration>
<value>17870</value>
<text>4時間58分</text>
</duration>
<distance>
<value>268334</value>
<text>268 km</text>
</distance>
<fare>
<value>5250.0000000</value>
<currency>JPY</currency>
<text>¥5,250</text>
</fare>
</element>
</row>
</DistanceMatrixResponse>
テストとして東京駅から名古屋駅までの経路を検索していて、12月3日の昼12時到着で検索しようとしています。(UNIX時間のUTCで指定とあったのでこれであっていると思うのですが・・・)
使うときはもちろんapikeyも入力して使っています。
しかし新幹線で1時間半で行ける距離が5時間もかかってしまっています。
原因と解決法がわかりましたらお教えください。
A 回答 (1件)
- 最新から表示
- 回答順に表示
No.1
- 回答日時:
良く分かりませんが、
特急料金を入れてないから?
乗車券だけでの移動を前提とした検索になっていませんか。
回答ありがとうございます。
その通りなんですけど、それがなんでそうなって、どうやったらなおるのかがわかんないんです。
一応説明しておくと、google maps apiはプログラムに組み込んで使うものなので、普通のgoogleマップのように検索時に選択してということはできません。
選択はURLの中のパラメータでリクエストします。
なんでこんなめんどくさいことをやっているかというと、エクセル上でVBAに組み込んで4000ヶ所から1ヶ所への到達時間を調べたいのです。
4000ヶ所をポチポチ1ヶ所づつ調べてメモるわけにいかないので…
ちなみに車では成功しています。
でもなぜか特急を使ってくれないんです…。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- 新幹線 気象や事故などの影響で爆延の新幹線深夜到着 8 2023/08/17 05:27
- Visual Basic(VBA) VBA Userformで一部別シートに転記がしたいのですが 2 2023/05/24 13:08
- その他(IT・Webサービス) 乗換案内(区間の一部を指定して有料特急を使用する検索) 4 2023/06/25 22:26
- 新幹線 東京⇔名古屋を新幹線で移動する場合、途中下車は可能でしょうか 4 2023/04/29 00:40
- 東海 往復時間に大半を取られる旅行はしますか? 10 2022/07/10 19:54
- Visual Basic(VBA) VBA 重複チェック後に値をワークシートに転記する方法を教えてください。 1 2023/03/19 12:43
- 新幹線 名古屋駅での新幹線乗り換え 6 2022/10/20 23:49
- JavaScript 以前の質問だと、どの条件でも配列が表示されてしまいます。 1 2022/07/09 11:40
- Visual Basic(VBA) Excelで下記のようにマクロを作ったところ、一回目は実行できたのですが、二回目以降「実行時エラー1 1 2022/03/25 08:08
- Visual Basic(VBA) 以下のVBAで該当文字列の前後に付与したい。 例 前に付与 abc ユーザーID 12345 後に付 3 2022/04/19 21:50
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
sublimit textっていうエディタ...
-
【VBS】クリップボード操作につ...
-
助けてください!
-
XMLファイルのattribute値がう...
-
演奏記号の・・・・
-
三項でたとえば交換って
-
他のフォームから別のフォーム...
-
C言語のOpenGLで複数のテクスチ...
-
VB.NETでのイベントの途中終了
-
VS CodeでTEXファイルにPDF形式...
-
VBAでcallで呼び出したsubを終...
-
再帰呼び出し
-
エクセルVBAでテキストボッ...
-
タイムアウトする仕組みを作りたい
-
Excel ユーザーフォームで計算 ...
-
【VB6.0】 あるフォームから他...
-
C#のループでtextboxに値を入れ...
-
C言語のサフィックスについて
-
VB.NETのテキストボックスで、...
-
こうもりの撃退法
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
sublimit textっていうエディタ...
-
ExcelのVBAで文章にある複数の...
-
テキストボックスかラベル上の...
-
【VBS】クリップボード操作につ...
-
RichTextBoxで指定行の色を自動...
-
vba 日本語以外を抽出について
-
文字列を配列に…。
-
Pythonのre.split()の正規表現...
-
VBスクリプトでファイルのコピ...
-
文字列を日付型情報として計算...
-
VB6.0 sp5]テキストボックスと...
-
XMLファイルのattribute値がう...
-
VBScript、ClipboardDataオブジ...
-
助けてください!
-
Googleシート「A1」でなくて「A...
-
HTMLのデータ読み取り
-
Visual Basicについてお聞きし...
-
[VB6] SQLの作成について
-
perlによるxmlファイルの取得
-
表の文字の均等割りについて
おすすめ情報
できなさそうなことがわかりました。
以前は特急どころか、徒歩のデータしか返されな堅そうです。
apiではなくnavitimeのルート検索をInternetExplorer.Applicationで開いて読み込む方法に切り替えました。
こちらもあと少しなのですが、別のところで躓いて、また質問しています。