Kiel Kalkuli Veturan Distancon inter Du Adresoj en Excel

  • Kundividu Ĉi Tion
Hugh West

Microsoft Excel estas tre diverstalenta kalkultabelprogramo. Ĝi proponas fari tiom ampleksan gamon da taskoj, kiujn vi eĉ ne povas imagi. Vi eĉ povas kalkuli la veturdistancon inter du adresoj en Excel. Se vi havas liston de adresoj por trovi la diferencon inter ili, vi povas kompreneble uzi MS Excel. Vi ankaŭ povas kalkuli la distancon permane. Sed tio estos tro tempopostula. Kiel vi havas centojn da miloj da distancoj por kalkuli. Tiel en ĉi tiu artikolo, mi montros al vi kiel kalkuli la veturdistancon inter du adresoj en Excel.

Elŝutu Praktikan Laborlibron

Vi povas elŝuti la Excel-dosieron de la sekva ligilo kaj praktiki kune kun ĝi.

Komputi Veturan Distancon Inter Du Adresoj.xlsm

2 Efikaj Manieroj por Kalkuli Veturan Distancon inter Du Adresoj en Excel

1 . Uzante trigonometriajn funkciojn por kalkuli veturdistancon

Ĉi tie, mi montros al vi kombini malsamajn trigonometriajn funkciojn por kalkuli la veturdistancon inter du adresoj en Excel.

Por doni vi ekzemplon, mi prenis du adresojn. La unua adreso estas MacArthur Park, Camden NSW, Aŭstralio . Ĝiaj latitudo kaj longitudo estas 34.06312149 kaj -118.2783975 respektive. La dua adreso estas Jersey City, Nov-Ĵerzejo, Usono . Ĝiaj latitudo kaj longitudo estas 40.71799929 kaj -74.04276812 respektive.

Nun, mi kombinos la ACOS , COS , SIN , & RADIOJ funkcias por krei formulon. La formulo efike kalkulos la veturdistancon inter du adresoj en mejloj.

Por tio,

❶ Elektu ĉelon D8 unue.

❷ Poste enigu la sekvan formulon en la ĉelo.

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

❸ Post tio, premu la ENTER butonon.

Nun, vi vidos, ke la formulo kalkulis la veturdistancon inter la MacArthur Park, Camden NSW, Aŭstralio, kaj Jersey City, Nov-Ĵerzejo, Usono en mejloj. Tiel, vi vidos la rezulton en ĉelo D8 kiu estas 2445.270922 mejloj.

>Formula disrompo

  • COS(RADIANS(90-C6)) *COS(RADIANS(90-C5)) – la RADIANS funkcioj konvertu la valorojn en radianojn kaj la COS funkcio provizas la kosinuson de la valoroj, la kosinusoj por latitudo estas tiam multobligitaj. Eligo – 0.365377540842758
  • COS(RADIANSO(D6-D5)) – provizas la kosinusovaloron por la longituddiferenco inter la du adresoj. Eligo – 0.716476936499882
  • SIN(RADIANS(90-C6)) *SIN(RADIANS(90-C5)) – kalkulas la deturniĝon de longitudoj de 90 radianoj kaj multobligis la sinusvalorojn. Eligo – 0.627884682513118
  • SIN(RADIANOJ(90-C6)) *SIN(RADIANOJ(90-C5)) *COS(RADIANOJ(D6-) D5)) – iĝas0,627884682513118 * 0,716476936499882. Eligo – 0.449864893802199
  • COS(RADIANOJ(90-C6)) *COS(RADIANOJ(90-C5)) +SIN(RADIANOJ(90-C6)) C6)) *SIN(RADIANOJ(90-C5)) *COS(RADIANOJ(D6-D5)) – fariĝas 0,365377540842758 * 0,449864893802199. Eligo – 0.81524243 AhFG0hk5nKCcQlk80MRaSk1ZtoYUYsX98BCLWi7p7MKZ-VrzOWptdUwsvj9D3L9F 958
  • Tiam la ACOS funkcio arkosinigas la valoron. Eligo – 0,617648629071256
  • Fine, multipliki la valoron per 3959 – 0,617648629071256 *3959 donas la rezulton en mejloj. Eligo – 2445.270922

Legu Pli: Kiel Kalkuli Mejlojn inter Du Adresoj en Excel (2 Metodoj)

2. Kalkuli Veturan Distancon inter Du Adresoj Uzante VBA-Kodon

En ĉi tiu sekcio, mi uzos VBA kodon por krei uzant-difinitan funkcion. Tiam mi uzos tiun funkcion por kalkuli la veturdistancon inter du adresoj en Excel.

Jen, mi uzas du adresojn. La unua adreso estas MacArthur Park, Camden NSW, Aŭstralio . Ĝiaj latitudo kaj longitudo estas 34.06312149 kaj -118.2783975 respektive. La dua adreso estas Jersey City, Nov-Ĵerzejo, Usono . Ĝiaj latitudo kaj longitudo estas respektive 40.71799929 kaj -74.04276812 .

Ĉe la I generos koordinatojn por ĉiu el la adresoj. Koordinato estas kombinaĵo de latitudo kaj longitudo. Por generi koordinaton,

  • Tajpu la latitudon de adresounue.
  • Tiam enigu komon.
  • Post tio tajpu la longitudon de la sama adreso.

Do la koordinato de la unua adreso estas 34.0631214903094. ,-118.27839753751 . Kaj la koordinato de la dua adreso estas 40.7179992930381,-74.0427681204225 .

La VBA kodo postulas API de mapo por kalkuli la veturdistancon. La API estas por Aplika Programado-Interfaco. Vi povas uzi API por konekti aŭ la Google Map aŭ la Bing Map kion ajn vi preferas.

Sed kreante la Guglon. Map API estas pagita. Male, vi povas krei API de la Bing MAP senkoste.

Tiel, mi uzas la Bing MAP API ĉi tie.

  • Por krei senpagan Bing MAP-API , klaku ĉi tie .

Mi kreis API . Mi aldonas la API malsupre:

AhFG0hk5nKCcQlk80MRaSk1ZtoYUYsX98BCLWi7p7MKZ-VrzOWptdUwsvj9D3L9F

Nun, estas tempo skribi la VBA kodo. Por tio,

  • Premu ALT + F11 por malfermi la VBA-Redaktilon .
  • Nun iru al Enmeti . ➤ Modulo por malfermi novan modulon.

Post malfermi la VBA-Redaktilon , enigu la jenan VBA kodo en la malfermita modulo.

4524

Kodo-Difekto

  • Ĉi tie , mi kreis uzant-difinitan funkcion nomatan Driving_Distance.
  • Tiam mi uzis 3 parametrojn: starloko , celo ,kaj ŝlosilvaloro. Jen la pozicio de la du adresoj kaj la API valoro respektive.
  • Tiam mi uzis plurajn variablojn kiel First_Value , Second_Value , Lasta_valoro , mitHTTP , & mitUrl. Ĉi tiuj variabloj estas uzataj por konservi malsamajn valorojn.
  • Tiam kombinis la valorojn (konservitajn ene de mitUrl ) kaj uzis plurajn objektometodojn ( Malfermi , SetRequestHeader , Sendu ). Jen kiel mi sukcesis kalkuli la veturdistancon per la API .

Ĉi tiu VBA kodo generas uzant-difinitan funkcion nomatan Driving_Distance .

La funkcio Driving_Distance postulas 3 argumentojn entute.

Jen la ĝenerala sintakso de la funkcio Driving_Distance .

=Driving_Distance(Start_Location_Coordinate,End_Location_Coordinate, API)

Nun, estas tempo apliki la uzant-difinitan funkcion. Por tio,

  • Elektu ĉelon E10 .
  • Tiam enigu la jenan formulon:
=Driving_Distance(E5,E6,C8)

  • Nun, premu ENTER .

Formula disfalo

  • E5 estas la Koordinato_Komenca_Loko .
  • E6 estas la Koordinato_Fino_Loka .
  • C8 estas la API de la Bing MAP .

La funkcio kalkulas la veturdistanco inter du adresoj en mejloj. Kontrolu ĉelon E10 . Ĝi vidos la nombron, 2790 .

Do la veturdistanco inter MacArthur Park,Camden NSW, Aŭstralio, kaj Jersey City, Nov-Ĵerzejo, Usono estas 2790 mejloj.

Legu Pli: Kiel Kalkuli Distancon Inter Du Adresoj en Excel (3 Manieroj)

Praktika Sekcio

Vi ricevos Excel-folion kiel la jena ekrankopio, ĉe la fino de la provizita Excel-dosiero kie vi povas praktiki ĉiujn metodojn diskutitajn en ĉi tiu artikolo.

Konkludo

En resumo, mi diskutis 2 manieroj kalkuli la veturdistancon inter du adresoj en Excel. Kaj ne hezitu demandi ajnajn demandojn en la komenta sekcio sube. Ni provos respondi al ĉiuj koncernaj demandoj kiel eble plej frue. Kaj bonvolu viziti nian retejon Exceldemy por esplori pli.

Hugh West estas tre sperta Excel-trejnisto kaj analizisto kun pli ol 10 jaroj da sperto en la industrio. Li tenas bakalaŭron en Kontado kaj Financo kaj magistron en Komercadministracio. Hugh havas entuziasmon por instruado kaj evoluigis unikan instruan aliron kiu estas facile sekvi kaj kompreni. Lia sperta scio pri Excel helpis milojn da studentoj kaj profesiuloj tutmonde plibonigi siajn kapablojn kaj elstari en siaj karieroj. Per sia blogo, Hugh dividas sian scion kun la mondo, proponante senpagajn Excel-lernilojn kaj interretan trejnadon por helpi individuojn kaj entreprenojn atingi sian plenan potencialon.