Kuinka laskea kahden osoitteen välinen etäisyys Excelissä (3 tapaa)

  • Jaa Tämä
Hugh West

Artikkelissa näytetään, miten lasketaan etäisyys kahden osoitteen välillä Excelissä. Microsoft Excelissä on tämä hieno erikoisominaisuus ja kaava, jonka avulla voidaan etäisyyden määrittäminen kahden paikan välillä maailmassa. Jos sinulla on GPS-koordinaatit kahdesta paikasta, voit helposti määrittää näiden paikkojen välinen etäisyys haluamassasi yksikössä.

Lataa harjoituskirja

Kahden osoitteen välisen etäisyyden laskeminen.xlsm

3 tapaa laskea kahden osoitteen välinen etäisyys Excelissä

Tietoaineistossamme on Leveysaste ja Pituusaste osoitteessa Ohio ja Alaska Mittaamme niiden välisen etäisyyden.

The Leveysasteet osoitteessa Ohio ja Alaska ovat 40.4173 pohjoinen ja 64.2008 Pohjoinen Myös Pituusasteet osoitteessa Ohio ja Alaska ovat 82.9071 Länsi ja 149.4937 Länsi vastaavasti.

1. Haversinen kaavan käyttäminen kahden osoitteen välisen etäisyyden laskemiseen.

Jos olet hyvä matematiikassa, käyttämällä Haversine-kaava Vaikka se antaa vain likimääräisen tuloksen, se on melko hyvä.

Ensinnäkin meidän on tiedettävä kaaren pituuden peruskaava . ja verrataan tätä kaavaa kahden maapallon paikan väliseen etäisyyteen. Kaava on esitetty alla.

S = rθ

S = Kahden osoitteen välinen etäisyys

r = Maan säde

θ = Kahden osoitteen aiheuttama kulma Maan keskipisteessä.

Mutta jos sinulla on GPS-koordinaatit kahdesta paikasta, sinun on määritettävä kahdesta paikasta Haversine-kaava Katso Haversine-kaava alla.

Jos tätä verrataan kaaren pituuden kaava saat seuraavan kuvan mukaisen tuloksen.

Tutustutaan seuraavaksi parametreihin, jotka ovat Haversine-kaava .

φ 1 = Ensimmäisen paikan leveysaste

φ 2 = toisen paikan leveysaste

1 = Ensimmäisen paikan pituusaste

2 = Toisen paikan leveysaste

Nyt näytän, miten tätä kaavaa sovelletaan Excelissä askel askeleelta.

Vaiheet:

  • Tee ensin solu, johon tallennetaan etäisyysarvo, ja kirjoita soluun seuraava kaava. C8 .

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

Kaavassa käytetään ASIN , SQRT , SIN ja COS toiminnot . Se on melko yksinkertaista, jos vain katsot, että Haversine-kaava Mittaamme etäisyyden kilometrejä , joten laitamme maapallon säde kilometreinä, joka on 6400 km . ASIN viittaa käänteinen sini tai ArcSine Jos verrataan parametrien kulmia, jotka ovat Haversine-kaava Excel-kaavalla saamme,

1 = Ohion leveysaste (C5)

2 = Alaskan leveysaste (C6)

1 = Ohion pituusaste (D5)

2 = Alaskan leveysaste (D6)

  • Paina sen jälkeen ENTER painiketta nähdäksesi etäisyyden Ohio ja Alaska osoitteessa Kilometrit .

  • Sen jälkeen, jos haluat mitata etäisyys maileina , käytä seuraavaa kaavaa solussa C8 .

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

Tässä käytimme samaa Excel-kaavaa, jota käytimme etäisyyden määrittämiseen vuonna miles Tästä syystä otamme maapallon säteen vuonna miles joka on 3959 .

Näin voit laskea etäisyys kahden maan Excelissä olevan maan osoitteen välillä soveltamalla Haversine-kaava .

Lue lisää: Kuinka laskea etäisyys kahden koordinaatin välillä Excelissä (2 menetelmää)

2. Excelin CONCATENATE- ja SUBSTITUTE-funktioiden soveltaminen kahden osoitteen välisen etäisyyden laskemiseen

Voit luoda Google Map linkki löytääksesi etäisyys kahden osoitteen välillä Excelin avulla CONCATENATE ja SIJAINEN Toiminnot Käydään prosessi läpi alla.

Vaiheet:

  • Kirjoita ensin seuraava kaava C8 .

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

Tämä kaava luo Google Map linkki siitä, miten voit matkustaa Ohio osoitteeseen Alaska . CONCATENATE toiminto lisää osoitteet linkissä ja SIJAINEN toiminto sijoittaa nimen osoitteet .

  • Paina seuraavaksi ENTER painiketta ja näet Google Map linkki sisään C8 .

  • Käytä tämän jälkeen tätä linkki Internet-hakupalkkiin ja saat näkyviin etäisyys tietoa näistä kaksi osoitetta .

Lopuksi voit laskea etäisyys kahden maan Excelissä olevan osoitteen välillä soveltamalla CONCATENATE ja SIJAINEN toiminnot.

Lue lisää: Kuinka laskea kahden kaupungin välinen etäisyys Excelissä

3. VBA:n käyttäminen kahden osoitteen välisen etäisyyden laskemiseen Excelissä

Toinen tapa laskea etäisyys kahden osoitteen välillä voisi olla tekemällä API ( Sovellusohjelmointirajapinta ) linkkiä ja luoda sen avulla Käyttäjän määrittelemä toiminto by VBA . Voit tehdä API linkki sisään Bing ilmaiseksi. Bing kartta Oma API-avaimesi, klikkaa tästä .

Vaiheet:

  • Mene ensin osoitteeseen Kehittäjä >> Visual Basic .

  • Valitse sen jälkeen Lisää >> Moduuli avataksesi VBA-moduuli .

  • Kirjoita myöhemmin seuraava koodi VBA-moduuli . Luomme Käyttäjän määrittelemä toiminto laskea etäisyys osoitteessa miles .
 Option Explicit Public Function DistanceInMiles(First_Location As String, _ Final_Location As String, Target_Value As String) Dim Initial_Point As String, Ending_Point As String, _ Distance_Unit As String, Setup_HTTP As Object, Output_Url As String Initial_Point = "//dev.virtualearth.net/REST/v1/Routes/DistanceMatrix?origins=" Ending_Point = "&destinations=" Distance_Unit ="&travelMode=driving&o=xml&key=" & Target_Value & "&distanceUnit=mi" Set Setup_HTTP = CreateObject("MSXML2.ServerXMLHTTP") Output_Url = Alkupiste & Ensimmäinen_sijainti & Loppupiste & Loppupiste & Lopullinen_sijainti & Etäisyys_Yksikkö Setup_HTTP.Open "GET", Output_Url, False Setup_HTTP.SetRequestHeader "Käyttäjäagentti", "Mozilla/4.0 (yhteensopiva; MSIE 6.0; Windows NT 5.0)"Setup_HTTP.Send ("") DistanceInMiles = Round(Round(WorksheetFunction.FilterXML(Setup_HTTP.ResponseText, _ "//TravelDistance")), 3), 0) End Function 

Koodi Selitys

  • Ensiksi nimesimme Toiminto kuten DistanceInMiles . Lisäsimme myös 3 parametrit: Ensimmäinen_sijainti As String, Lopullinen_sijainti As String ja Target_Value As String .
  • Tämän jälkeen ilmoitimme Initial_Point , Ending_Point , Etäisyys_Yksikkö ja Outout_Url kuten merkkijono ; Setup_HTTP kuten Kohde .
  • Myöhemmin asetamme Initial_Point alkavana Url-linkki , Ending_Point kuten Kohde ja Etäisyys_Yksikkö osoitteeseen Miles .
  • Tämän jälkeen asetamme tarvittavat parametrit luodaksemme suhteen meidän VBA koodi ja API
  • Lopuksi perustimme Käyttäjän määrittelemä toiminto .
  • Tämän jälkeen tehtiin samoja menettelyjä noudattaen toinenkin uusi Käyttäjän määrittelemä toiminto etäisyyden löytämiseksi kilometrejä .

Voit nähdä, että muutimme juuri Etäisyys_Yksikkö osoitteeseen kilometrejä .

  • Tämän jälkeen seuraavassa kuvassa näkyy, että API avain soluun C8 .

  • Kirjoita sen jälkeen seuraava kaava soluun C8 .

=DistanceInMiles(E5,E6,C8)

  • Paina seuraavaksi ENTER painiketta ja näet etäisyys välillä Ohio ja Alaska osoitteessa miles .

  • Sen jälkeen voit käyttää seuraavaa kaavaa nähdäksesi, mikä on etäisyys osoitteessa kilometri .

=DistanceInKM(E5,E6,C8)

Näin voit laskea etäisyys kahden osoitteen välillä käyttämällä VBA ja API avain.

Lue lisää: Kuinka laskea ajoetäisyys kahden osoitteen välillä Excelissä?

Muistettavat asiat

  • Pidä tämä mielessä, sinun täytyy laittaa suunnilleen oikea GPS-koordinaatit näistä valtiot datassa, koska käytät internetiä etäisyyden löytämiseen. Koska valtiot ovat west osoitteeseen Meridian Line , molemmat heidän Pituusasteet on negatiivinen.

Harjoitusosio

Tässä osiossa annan sinulle tämän artikkelin tietokokonaisuuden, jotta voit harjoitella näitä menetelmiä itse.

Päätelmä

Riittää sanoa, että opit erittäin tehokkaita menetelmiä, miten laskea - etäisyys kahden osoitteen välillä Excelissä tämän artikkelin lukemisen jälkeen. Jos sinulla on parempia menetelmiä tai kysymyksiä tai palautetta tästä artikkelista, jaa ne kommenttikenttään. Tämä auttaa minua rikastuttamaan tulevia artikkeleitani. Jos haluat lisätietoja, käy ystävällisesti verkkosivuillamme. ExcelWIKI.com .

Hugh West on erittäin kokenut Excel-kouluttaja ja analyytikko, jolla on yli 10 vuoden kokemus alalta. Hän on koulutukseltaan laskentatoimen ja rahoituksen kandidaatti sekä kauppatieteiden maisteri. Hughilla on intohimo opettamiseen, ja hän on kehittänyt ainutlaatuisen opetusmenetelmän, jota on helppo seurata ja ymmärtää. Hänen asiantuntemuksensa Excelistä on auttanut tuhansia opiskelijoita ja ammattilaisia ​​maailmanlaajuisesti parantamaan taitojaan ja menestymään urallaan. Blogissaan Hugh jakaa tietämyksensä maailman kanssa tarjoamalla ilmaisia ​​Excel-opetusohjelmia ja verkkokoulutusta auttaakseen yksilöitä ja yrityksiä saavuttamaan täyden potentiaalinsa.