Написот ќе ви покаже како да го пресметате растојанието помеѓу две адреси во Excel. Microsoft Excel ја има оваа одлична посебна карактеристика и формула за пронаоѓање на растојанието помеѓу две места во светот. Ако имате GPS координати од две места, можете лесно да го одредите растојанието помеѓу тие места во која било единица што ја сакате.

Преземете ја работната книга за вежбање

Пресметување растојание помеѓу две адреси.xlsm

3 начини да се пресмета растојанието помеѓу две адреси во Excel

Во нашата база на податоци, имаме Широчина и Госоина за Охајо и Аљаска . Ќе го измериме растојанието меѓу нив.

Широчините за Охајо и Алјаска се 40.4173 Север и 64.2008 Север соодветно. Исто така, ложините за Охајо и Аљаска се 82,9071 запад и 149,4937 запад соодветно.

1. Користење на формулата Haversine за пресметување на растојанието помеѓу две адреси

Ако сте добри во математиката, користењето на Haversine Formula ќе биде совршено за вас. Иако ќе ви даде приближен резултат, тој е прилично добар.

Најпрво, треба да ја знаеме основната формула за должина на лакот . И користејќи ја таа формула, ја споредуваме со растојанието помеѓу две места на земјата. Формулата е дадена подолу.

S = rθ

S = Растојание помеѓудве адреси

r = Радиус на Земјата

θ = Агол воведен во центарот на Земјата со двете адреси

Но, ако имате GPS координати од две места, треба да одредите од Формулата Haversine . Погледнете ја Formula Haversine прикажана подолу.

Ако го споредите ова со формулата за должина на лакот , ќе добиете како во следнава слика.

Да ве запознаеме со параметрите на Haversine Formula .

φ ₁ = Географска ширина на првото место

φ ₂ = Географска ширина на второто место

ℽ ₁ = Географска должина на првото место

ℽ ₂ = Географска ширина на второто место

Сега, ќе ви покажам како да ја примените оваа формула во Excel чекор по чекор.

Чекори:

• Прво, направете ќелија за складирање на вредноста на растојанието и напишете ја следнава формула во ќелијата C8 .

=2*6400*ASIN(SQRT((SIN(C6-C5)/2)^2+COS(C5)*COS(C6)*(SIN(D6-D5)/2)^2))

Формулата користи ASIN , SQRT , SIN и COS функции . Прилично е едноставно ако само ја погледнете Формулата Haversine . Растојанието го мериме во километри , па радиусот на земјата го ставаме во километри што е 6400 km . ASIN се однесува на инверзниот синус или ArcSine . Ако ги споредиме аглите на параметрите на Haversine Formula со нашата формула Excel, ниедобие,

₁ = Географска ширина на Охајо (C5)

₂ = Географска ширина на Алјаска (C6)

ℽ ₁ = Географска должина на Охајо ( D5)

ℽ ₂ = Географска ширина на Алјаска (D6)

• Потоа, притиснете го копчето ENTER за да го видите растојанието помеѓу Охајо и Аљаска во Километри .

• Потоа, ако сакате да го измерите растојанието во милји , користете ја следнава формула во ќелијата C8 .

=2*3959*ASIN(SQRT((SIN(C6-C5)/2)^2+COS(C5)*COS(C6)*(SIN(D6-D5)/2)^2))

Тука, ја користевме истата формула на Excel што ја користевме за да го најдеме растојанието во милји . Поради таа причина, го земаме радиусот на земјата во милји што е 3959 .

Така можете да го пресметате растојанието помеѓу две адреси на земјата во Excel со примена на Haversine Formula .

Прочитај повеќе: Како да се пресмета растојанието помеѓу две координати во Excel (2 методи)

2. Примена на функциите Excel CONCATENATE и SUBSTITUTE за пресметување растојание помеѓу две адреси

Можете да креирате Google Map врска за да го најдете растојанието помеѓу две адреси користејќи Excel <Функции 1>CONCATENATE и SUBSTITUTE . Ајде да го поминеме процесот подолу.

Чекори:

• Прво, напишете ја следнава формула во C8 .

=CONCATENATE("//maps.google.co.uk/maps?f=d&source=s_d&saddr=", SUBSTITUTE(B5," ","+"),"&daddr=",SUBSTITUTE(B6," ","+"))

Оваа формула ќе создаде Карта на Google врска за тоа како можете да патувате од Охајо до Алјаска . Функцијата CONCATENATE ќе ги додаде адресите во врската и функцијата SUBSTITUTE ќе го стави името на адресите .

• Следно, притиснете го копчето ENTER и ќе ја видите врската Google Map во C8 .

• Потоа, користете ја оваа врска во лентата за пребарување на интернет и ќе ги добиете информациите за далечина за овие две адреси .

Конечно, можете да го пресметате растојанието помеѓу две адреси на земјата во Excel со примена на CONCATENATE и функциите SUBSTITUTE .

Прочитај повеќе: Како да се пресмета растојанието помеѓу два града во Excel

3 . Користење на VBA за пресметување растојание помеѓу две адреси во Excel

Друг начин да се пресмета растојанието помеѓу две адреси може да биде со правење API ( Апликација Програмски интерфејс ) и го користите за да креирате функција дефинирана од корисникот со VBA . Можете да направите API врска во Bing бесплатно. За да креирате Бинг карта клуч за API, кликнете овде .

Чекори:

• Прво , одете во Програмер >> Visual Basic .

• После тоа, изберете Вметнете >> Модул за да го отворите VBA модулот .

• Подоцна , напишете го следниов код во VBA модул . Ние создаваме Функција дефинирана од корисникот за пресметување на растојание во милји .

3000

Објаснување на кодот

• Прво, ја именувавме нашата функција како DistanceInMiles . Внесовме и 3 параметри: First_Location како стринг, Final_Location како стринг и Target_Value како стринг .
• Потоа, објавивме Почетна_точка , Крајна_точка , Единица_растојание и Надвор_URL како Низа ; Setup_HTTP како Објект .
• Подоцна, ја поставивме Initial_Point како почеток на врската URL , Завршна_точка како Дестинација и Единица_растојание до Милји .
• Потоа, ги поставуваме  неопходните параметри за да создадеме врска помеѓу нашата VBA кодот и API
• Конечно, ја воспоставивме нашата функција дефинирана од корисникот .

• После тоа , следејќи ги истите постапки, направивме друга функција дефинирана од корисникот за да го пронајдеме растојанието во километри .

Вие може да го види тоа, ние само ја сменивме Distance_Unit во kilometers .

• Потоа, на следната слика, можете да го видите API Клучете во ќелијата C8 .

• Потоа, напишете ја следнава формула во ќелијата C8 .

=DistanceInMiles(E5,E6,C8)

• Следно, притиснете ENTER копчето и ќе го видите растојание помеѓу Охајо и Аљаска во милји .

• Потоа, користете ја следнава формула за да го видите растојанието во километар .

=DistanceInKM(E5,E6,C8)

Така, можете да го пресметате растојанието помеѓу две адреси користејќи ги копчињата VBA и API .

Прочитајте повеќе: Како да се пресмета растојанието за возење помеѓу две адреси во Excel

Работи што треба да се запаметат

• Имајте го тоа на ум, треба да ставите приближно точни GPS координати од овие состојби во податоците бидејќи користите интернет за да ја пронајдете растојанието. Бидејќи состојбите се западно до меридијанската линија , и двете нивни ложини ќе бидат негативни.

Оддел за вежбање

Во овој дел, ќе ви ја дадам базата на податоци од овој напис за да можете сами да ги практикувате овие методи.

Заклучок

Доволно е да се каже, ќе научите многу ефективни методи како да пресметате растојание помеѓу две адреси во Excel откако ќе ја прочитате оваа статија. Ако имате подобри методи или прашања или повратни информации во врска со овој напис, ве молиме споделете ги во полето за коментари. Ова ќе ми помогне да ги збогатам моите претстојни написи. За повеќе прашања, ве молиме посетете ја нашата веб-страница ExcelWIKI.com .