Innholdsfortegnelse
Microsoft Excel er et veldig allsidig regnearkprogram. Den tilbyr å gjøre et så bredt spekter av oppgaver som du ikke engang kan forestille deg. Du kan til og med beregne kjøreavstanden mellom to adresser i Excel. Hvis du har en liste over adresser for å finne forskjellen mellom dem, kan du selvfølgelig bruke MS Excel. Du kan også beregne avstanden manuelt. Men det vil være for tidkrevende. Som du har hundretusenvis av avstander å beregne. Derfor vil jeg i denne artikkelen vise deg hvordan du beregner kjøreavstanden mellom to adresser i Excel.
Last ned Practice Workbook
Du kan laste ned Excel-filen fra følgende lenke og trene sammen med it.
Beregn kjøreavstand mellom to adresser.xlsm
2 effektive måter å beregne kjøreavstand mellom to adresser i Excel
1 Bruke trigonometriske funksjoner for å beregne kjøreavstand
Her vil jeg vise deg hvordan du kombinerer forskjellige trigonometriske funksjoner for å beregne kjøreavstanden mellom to adresser i Excel.
For å gi du et eksempel, jeg har tatt to adresser. Den første adressen er MacArthur Park, Camden NSW, Australia . Bredde- og lengdegraden er henholdsvis 34.06312149 og -118.2783975 . Den andre adressen er Jersey City, New Jersey, USA . Bredde- og lengdegraden er 40.71799929 og -74.04276812 henholdsvis.
Nå vil jeg kombinere ACOS , COS , SIN , & RADIANER funksjoner for å lage en formel. Formelen vil effektivt beregne kjøreavstanden mellom to adresser i miles.
For det,
❶ Velg celle D8 først.
❷ Sett deretter inn følgende formel i cellen.
=ACOS(COS(RADIANS(90-C6)) *COS(RADIANS(90-C5)) +SIN(RADIANS(90-C6)) *SIN(RADIANS(90-C5)) * COS(RADIANS(D6-D5))) *3959
❸ Trykk deretter på ENTER -knappen.
Nå vil du se at formelen har beregnet kjøreavstanden mellom MacArthur Park, Camden NSW, Australia, og Jersey City, New Jersey, USA i miles. Dermed vil du se resultatet i celle D8 som er 2445.270922 miles.
Formeloversikt
- COS(RADIANS(90-C6)) *COS(RADIANS(90-C5)) – RADIANS funksjonene konverter verdiene til radianer og COS funksjonen gir cosinus til verdiene, cosinusene for breddegrad multipliseres deretter. Utgang – 0,365377540842758
- COS(RADIANS(D6-D5)) – gir cosinusverdien for lengdegradsforskjellen mellom de to adressene. Utgang – 0,716476936499882
- SIN(RADIANS(90-C6)) *SIN(RADIANS(90-C5)) – beregner avledningen av lengdegrader fra 90 radianer og multiplisert sinusverdiene. Utgang – 0,627884682513118
- SIN(RADIANS(90-C6)) *SIN(RADIANS(90-C5)) *COS(RADIANS(D6- D5)) – blir0,627884682513118 * 0,716476936499882. Utgang – 0,449864893802199
- COS(RADIANS(90-C6)) *COS(RADIANS(90-C5)) +SIN(RADIANS(90- C6)) *SIN(RADIANS(90-C5)) *COS(RADIANS(D6-D5)) – blir 0,365377540842758 * 0,449864893802199. Output – 0,815242434644958
- Deretter arccosiserer ACOS -funksjonen verdien. Utgang – 0,617648629071256
- Til slutt, multiplisere verdien med 3959 – 0,617648629071256 *3959 gir resultatet i miles. Utgang – 2445.270922
Les mer: Hvordan beregne mil mellom to adresser i Excel (2 metoder)
2. Beregn kjøreavstand mellom to adresser ved å bruke VBA-kode
I denne delen vil jeg bruke en VBA -kode for å lage en brukerdefinert funksjon. Deretter vil jeg bruke den funksjonen til å beregne kjøreavstanden mellom to adresser i Excel.
Her bruker jeg to adresser. Den første adressen er MacArthur Park, Camden NSW, Australia . Bredde- og lengdegraden er henholdsvis 34.06312149 og -118.2783975 . Den andre adressen er Jersey City, New Jersey, USA . Bredde- og lengdegraden er henholdsvis 40.71799929 og -74.04276812 .
I vil generere koordinater for hver av adressene. En koordinat er en kombinasjon av breddegrad og lengdegrad. For å generere en koordinat,
- Skriv inn breddegraden til en adresseførst.
- Sett deretter inn et komma.
- Skriv deretter lengdegraden til den samme adressen.
Så koordinaten til den første adressen er 34.0631214903094 ,-118,27839753751 . Og koordinaten til den andre adressen er 40.7179992930381,-74.0427681204225 .
VBA koden krever en API av et kart for å beregne kjøreavstanden. API står for Application Programming Interface. Du kan bruke en API for å koble til enten Google Map eller Bing Map hva du foretrekker.
Men å lage Google Map API er betalt. Tvert imot, du kan lage en API av Bing MAP gratis.
Derfor bruker jeg Bing MAP API her.
- For å lage en gratis Bing MAP API , klikk her .
Jeg har opprettet en API . Jeg legger ved API-en nedenfor:
AhFG0hk5nKCcQlk80MRaSk1ZtoYUYsX98BCLWi7p7MKZ-VrzOWptdUwsvj9D3L9F
Nå er det på tide å skrive VBA kode. For det,
- Trykk ALT + F11 for å åpne VBA Editor .
- Gå nå til Sett inn ➤ Modul for å åpne en ny modul.
Etter å ha åpnet VBA Editor setter du inn følgende VBA kode i den åpnede modulen.
1128
Kodeoversikt
- Her , Jeg har laget en brukerdefinert funksjon kalt Kjøreavstand.
- Da brukte jeg 3 parametere: startsted , destinasjon ,og nøkkelverdi. Dette er posisjonen til henholdsvis de to adressene og API -verdien.
- Deretter brukte jeg flere variabler som First_Value , Second_Value , Siste_verdi , mitHTTP , & mitUrl. Disse variablene brukes til å lagre forskjellige verdier.
- Kombinerte deretter verdiene (lagret i mitUrl ) og brukte flere objektmetoder ( Open , SetRequestHeader , Send ). Slik klarte jeg å beregne kjøreavstanden gjennom API .
Denne VBA koden genererer en brukerdefinert funksjon kalt Driving_Distance .
Funksjonen Kjøreavstand krever 3 argumenter totalt.
Her er den generelle syntaksen til funksjonen Kjøreavstand .
=Driving_Distance(Start_Location_Coordinate,End_Location_Coordinate, API)
Nå er det på tide å bruke den brukerdefinerte funksjonen. For det,
- Velg celle E10 .
- Sett deretter inn følgende formel:
=Driving_Distance(E5,E6,C8)
- Trykk nå ENTER .
Formeloversikt
- E5 er Start_Location_Coordinate .
- E6 er End_Location_Coordinate .
- C8 er API til Bing MAP .
Funksjonen beregner kjøreavstand mellom to adresser i miles. Sjekk ut celle E10 . Den vil se nummeret, 2790 .
Så kjøreavstanden mellom MacArthur Park,Camden NSW, Australia, og Jersey City, New Jersey, USA er 2790 miles.
Les mer: Hvordan beregne avstanden mellom to adresser i Excel (3 måter)
Øvingsseksjonen
Du vil få et Excel-ark som følgende skjermbilde, på slutten av den medfølgende Excel-filen der du kan øve på alle metodene som er omtalt i denne artikkelen.
Konklusjon
For å oppsummere har jeg diskutert 2 måter å beregne kjøreavstanden mellom to adresser i Excel. Og ikke nøl med å stille spørsmål i kommentarfeltet nedenfor. Vi vil prøve å svare på alle relevante spørsmål snarest. Og besøk nettstedet vårt Exceldemy for å utforske mer.