Izračunavanje razdaljine

Kako da izračunamo razdaljinu između dva mesta na mapi? Najjednostavniji način je primenom formule za izračunavanje haversina, koja za zadate koordinate daje udaljenost tačaka na sferi. Ipak, ovo je vazdušna razdaljina, a ako planirate da krenete na put sigurno vas zanima kako stići od tačke A do tačke B uobičajenim saobraćajnicama. U tekstu koji sledi pokazaću vam kako da iskoristite Google Maps biblioteke u ovu svrhu…

Formulu za izračunavanje haversina pronašao sam ovde, a formulu za korišćenje Google Maps-a u svrhu izračunavanja razdaljina možete da pronađete na ovoj adresi. Klikom na Alt+F11 ulazi se u Visual Basic Editor. Zatim treba da izaberete opciju Insert/New Module i da dodate ove dve formule. Kako bi smo ih lakše razlikovali dao sam im imena GetDistanceH i GetDistanceG i izvrši manje korekcije u kodu u skladu sa novim imenima.00197-1

Da bi ste izračunali vazdušnu udaljenost između dva mesta treba da kreirate tabelu koja sadrži kolone sa: nazivima mesta, geografskim širinama i dužinama oba mesta. U poslednju kolonu upišite formulu, primenom funkcije GetDistanceH, a zatim je iskopirajte u preostale ćelije u tabeli.00197-2

Da bi ste izračunali udaljenost putem, potrebna je puno jednostavnija tabela. U nju upisujete samo nazive polazišta i odredišta (obavezno navedite naziv mesta i naziv zemlje), a razdaljinu računate uz pomoć funkcije GetDistanceH. Radi dobijanja rezultata u kilometrima vrednost funkcije treba da se podeli sa 1000. Ova funkcija radi za nijansu sporije, pošto preuzima podatke sa Interneta.00197-3

Ako sada odete na Google Maps, unesete polazište i odredište, videćete da se dobijaju slični rezultati.00197-4