Hoe kinne jo rydôfstân berekkenje tusken twa adressen yn Excel

  • Diel Dit
Hugh West

Microsoft Excel is in heul alsidige spreadsheetprogramma. It biedt sa'n breed oanbod fan taken te dwaan dat jo jo net iens kinne foarstelle. Jo kinne sels de rydôfstân tusken twa adressen yn Excel berekkenje. As jo ​​in list mei adressen hawwe om it ferskil tusken har te finen, kinne jo fansels MS Excel brûke. Jo kinne ek de ôfstân manuell berekkenje. Mar dat sil te tiidslinend wêze. Om't jo hûnderttûzenen ôfstannen hawwe om te berekkenjen. Sa sil ik jo yn dit artikel sjen litte hoe't jo de rydôfstân tusken twa adressen yn Excel berekkenje kinne.

Oefenwurkboek downloade

Jo kinne it Excel-bestân downloade fan 'e folgjende keppeling en oefenje tegearre mei it.

Berekkenje rydôfstân tusken twa adressen.xlsm

2 effektive manieren om rydôfstân tusken twa adressen yn Excel te berekkenjen

1 Trigonometryske funksjes brûke om rydôfstân te berekkenjen

Hjir sil ik jo sjen litte om ferskate trigonometryske funksjes te kombinearjen om de rydôfstân tusken twa adressen yn Excel te berekkenjen.

Om te jaan do in foarbyld, Ik haw nommen twa adressen. It earste adres is MacArthur Park, Camden NSW, Austraalje . De breedte- en lengtegraad binne respektivelik 34.06312149 en -118.2783975 . It twadde adres is Jersey City, New Jersey, Feriene Steaten . De breedte- en lengtegraad zijn 40.71799929 en -74.04276812 respektivelik.

No sil ik de ACOS , COS , SIN , & RADIANS funksjes om in formule te meitsjen. De formule sil effektyf de rydôfstân tusken twa adressen yn kilometers berekkenje.

Dêrfoar

❶ Selektearje earst sel D8 .

❷ Foegje dan ynfoegje de folgjende formule yn de sel.

=ACOS(COS(RADIANS(90-C6)) *COS(RADIANS(90-C5)) +SIN(RADIANS(90-C6)) *SIN(RADIANS(90-C5)) * COS(RADIANS(D6-D5))) *3959

❸ Druk dêrnei op de knop ENTER .

No sille jo sjen dat de formule de rydôfstân hat berekkene tusken MacArthur Park, Camden NSW, Austraalje, en Jersey City, New Jersey, USA yn milen. Sa sille jo it resultaat sjen yn sel D8 dat is 2445.270922 miles.

Formule-ôfdieling

  • COS(RADIANS(90-C6)) *COS(RADIANS(90-C5)) – de RADIANS funksjes konvertearje de wearden yn radialen en de COS funksje jout de cosinus fan 'e wearden, de cosinus foar breedte wurde dan fermannichfâldige. Utfier – 0.365377540842758
  • COS(RADIANS(D6-D5)) – jout de cosinuswearde foar it lingtegraadferskil tusken de twa adressen. Utfier – 0.716476936499882
  • SIN(RADIANS(90-C6)) *SIN(RADIANS(90-C5)) – berekkent de omlieding fan lingtegraad út 90 radialen en fermannichfâldige de sinus wearden. Utfier – 0.627884682513118
  • SIN(RADIANS(90-C6)) *SIN(RADIANS(90-C5)) *COS(RADIANS(D6-) D5)) – wurdt0,627884682513118 * 0,716476936499882. Utfier – 0.449864893802199
  • COS(RADIANS(90-C6)) *COS(RADIANS(90-C5)) +SIN(RADIANS(90-) C6)) *SIN(RADIANS(90-C5)) *COS(RADIANS(D6-D5)) – wurdt 0,365377540842758 * 0,449864893802199. Utfier – 0.815242434644958
  • Dan arccosine de ACOS funksje de wearde. Utfier – 0.617648629071256
  • Uteinlik, fermannichfâldigje de wearde mei 3959 – 0,617648629071256 *3959 jout it resultaat yn milen. Utfier – 2445.270922

Lês mear: Hoe kinne jo milen berekkenje tusken twa adressen yn Excel (2 metoaden)

2. Berekkenje rydôfstân tusken twa adressen mei VBA-koade

Yn dizze seksje sil ik in VBA koade brûke om in brûker-definieare funksje te meitsjen. Dan sil ik dy funksje brûke om de rydôfstân tusken twa adressen yn Excel te berekkenjen.

Hjir brûk ik twa adressen. It earste adres is MacArthur Park, Camden NSW, Austraalje . De breedte- en lengtegraad binne respektivelik 34.06312149 en -118.2783975 . It twadde adres is Jersey City, New Jersey, Feriene Steaten . De breedte- en lengtegraad binne respektivelik 40.71799929 en -74.04276812 .

By de I sil koördinaten generearje foar elk fan de adressen. In koördinaat is in kombinaasje fan breedte- en lingtegraad. Om in koördinaat te generearjen,

  • Typ de breedtegraad fan in adresearst.
  • Dan ynfoegje in komma.
  • Dêrnei typ de lingtegraad fan itselde adres.

Dus de koördinaat fan it earste adres is 34.0631214903094 , -118.27839753751 . En de koördinaat fan it twadde adres is 40.7179992930381,-74.0427681204225 .

De VBA koade fereasket in API fan in kaart om de rydôfstân te berekkenjen. De API stiet foar Application Programming Interface. Jo kinne in API brûke om de Google Map of de Bing Map te ferbinen wat jo ek wolle.

Mar it meitsjen fan de Google Map API wurdt betelle. Krektoarsom, jo ​​kinne fergees in API fan de Bing MAP oanmeitsje.

Sa brûk ik de Bing MAP API hjir.

  • Om in fergese Bing MAP API te meitsjen, klik hjir .

Ik haw in API . Ik hechtsje de API hjirûnder:

AhFG0hk5nKCcQlk80MRaSk1ZtoYUYsX98BCLWi7p7MKZ-VrzOWptdUwsvj9D3L9F

No is it tiid om de VBA koade. Dêrfoar

  • Druk op ALT + F11 om de VBA Editor te iepenjen.
  • Gean no nei Ynfoegje Module om in nije module te iepenjen.

Nei it iepenjen fan de VBA Editor , ynfoegje de folgjende VBA koade yn 'e iepene module.

3469

Koade-ôfdieling

  • Hjir , Ik haw in troch brûkers definieare funksje makke mei de namme Driving_Distance.
  • Dan brûkte ik 3 parameters: startlokaasje , bestimming ,en kaaiwearde. Dit binne respektivelik de posysje fan de twa adressen en de API wearde.
  • Dan brûkte ik ferskate fariabelen lykas First_Value , Second_Value , Lêste_wearde , mitHTTP , & mitUrl. Dizze fariabelen wurde brûkt om ferskillende wearden op te slaan.
  • Dan kombinearje de wearden (opslein yn mitUrl ) en brûkten ferskate objektmetoaden ( Open , SetRequestHeader , Stjoer ). Dit is hoe't ik it slagge om de rydôfstân te berekkenjen fia de API .

Dizze VBA koade genereart in troch de brûkers definieare funksje mei de namme Driving_Distance .

De funksje Rydôfstân fereasket 3 arguminten yn totaal.

Hjir is de generyske syntaksis fan de funksje Rydôfstân .

=Driving_Distance(Start_Location_Coordinate,End_Location_Coordinate, API)

No is it tiid om de troch de brûker definieare funksje ta te passen. Dêrfoar

  • Selektearje sel E10 .
  • Foegje dan de folgjende formule yn:
=Driving_Distance(E5,E6,C8)

  • Druk no op ENTER .

Formule-ôfdieling

  • E5 is de Start_Location_Coordinate .
  • E6 is de End_Location_Coordinate .
  • C8 is de API fan de Bing MAP .

De funksje berekkent de rydôfstân tusken twa adressen yn milen. Besjoch sel E10 . It sil it nûmer sjen, 2790 .

Dus de rydôfstân tusken MacArthur Park,Camden NSW, Austraalje, en Jersey City, New Jersey, Feriene Steaten is 2790 miles.

Lês mear: Hoe kinne jo ôfstân tusken twa adressen berekkenje yn Excel (3 manieren)

Oefeningsseksje

Jo krije in Excel-blêd lykas de folgjende skermôfbylding, oan 'e ein fan it levere Excel-bestân wêr't jo alle metoaden kinne oefenje dy't yn dit artikel besprutsen binne.

Konklúzje

Om gear te nimmen, haw ik 2 besprutsen. manieren om de rydôfstân te berekkenjen tusken twa adressen yn Excel. En aarzelje net om fragen te stellen yn 'e kommentaar seksje hjirûnder. Wy sille besykje sa gau mooglik te reagearjen op alle relevante fragen. En besykje ús webside Exceldemy om mear te ferkennen.

Hugh West is in tige betûfte Excel-trainer en analist mei mear as 10 jier ûnderfining yn 'e yndustry. Hy hat in bachelorstitel yn boekhâlding en finânsjes en in masterstitel yn bedriuwsadministraasje. Hugh hat in passy foar lesjaan en hat in unike lesoanpak ûntwikkele dy't maklik te folgjen en te begripen is. Syn saakkundige kennis fan Excel hat tûzenen studinten en professionals wrâldwiid holpen har feardigens te ferbetterjen en útblinke yn har karriêre. Troch syn blog dielt Hugh syn kennis mei de wrâld, en biedt fergese Excel-tutorials en online training om partikulieren en bedriuwen te helpen har folsleine potensjeel te berikken.