Com calcular la distància de conducció entre dues adreces a Excel

Hugh West

29-09-2023 Fórmules Excel
  • Comparteix Això
Hugh West

Microsoft Excel és un programa de fulls de càlcul molt versàtil. Ofereix fer un ventall tan ampli de tasques que ni tan sols us podeu imaginar. Fins i tot podeu calcular la distància de conducció entre dues adreces a Excel. Si teniu una llista d'adreces per trobar la diferència entre elles, podeu utilitzar MS Excel. També podeu calcular la distància manualment. Però això requerirà massa temps. Com tens centenars de milers de distàncies per calcular. Així, en aquest article, us mostraré com calcular la distància de conducció entre dues adreces a Excel.

Descarregar el quadern de pràctiques

Podeu descarregar el fitxer Excel des del següent enllaç i practicar juntament amb it.

Calculeu la distància de conducció entre dues adreces.xlsm

2 maneres efectives de calcular la distància de conducció entre dues adreces a Excel

1 . Ús de funcions trigonomètriques per calcular la distància de conducció

Aquí us mostraré com combineu diferents funcions trigonomètriques per calcular la distància de conducció entre dues adreces a Excel.

Per donar un exemple, he pres dues adreces. La primera adreça és MacArthur Park, Camden NSW, Austràlia . La seva latitud i longitud són 34,06312149 i -118,2783975 respectivament. La segona adreça és Jersey City, Nova Jersey, EUA . La seva latitud i longitud són 40,71799929 i -74,04276812 respectivament.

Ara, combinaré els ACOS , COS , SIN i & RADIANS funcions per crear una fórmula. La fórmula calcularà efectivament la distància de conducció entre dues adreces en milles.

Per això,

❶ Seleccioneu la cel·la D8 primer.

❷ A continuació, inseriu-lo. la fórmula següent a la cel·la.

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

❸ Després, premeu el botó ENTER .

Ara, veureu que la fórmula ha calculat la distància de conducció entre MacArthur Park, Camden NSW, Austràlia i Jersey City, Nova Jersey, EUA en milles. Així, veureu el resultat a la cel·la D8 que és 2445,270922 milles.

Desglossament de la fórmula

  • COS(RADIANS(90-C6)) *COS(RADIANS(90-C5)) – les funcions RADIANS converteix els valors en radians i la funció COS proporciona el cosinus dels valors, els coseus de la latitud es multipliquen llavors. Sortida – 0,365377540842758
  • COS(RADIANS(D6-D5)) : proporciona el valor del cosinus per a la diferència de longitud entre les dues adreces. Sortida – 0,716476936499882
  • SIN(RADIANS(90-C6)) *SIN(RADIANS(90-C5)) – calcula el desviament de longituds a partir de 90 radians i va multiplicar els valors del sinus. Sortida – 0,627884682513118
  • SIN(RADIANS(90-C6)) *SIN(RADIANS(90-C5)) *COS(RADIANS(D6-) D5)) – esdevé0,627884682513118 * 0,716476936499882. Sortida – 0,449864893802199
  • COS(RADIANS(90-C6)) *COS(RADIANS(90-C5)) +SIN(RADIANS(90-) C6)) *SIN(RADIANS(90-C5)) *COS(RADIANS(D6-D5)) – passa a ser 0,365377540842758 * 0,449864893802199. Sortida – 0,815242434644958
  • A continuació, la funció ACOS arcosina el valor. Sortida – 0,617648629071256
  • Finalment, multiplicant el valor per 3959 – 0,617648629071256 *3959 proporciona el resultat en milles. Sortida – 2445.270922

Llegir més: Com calcular quilòmetres entre dues adreces a Excel (2 mètodes)

2. Calcula la distància de conducció entre dues adreces utilitzant el codi VBA

En aquesta secció, utilitzaré un codi VBA per crear una funció definida per l'usuari. A continuació, utilitzaré aquesta funció per calcular la distància de conducció entre dues adreces a Excel.

Aquí estic fent servir dues adreces. La primera adreça és MacArthur Park, Camden NSW, Austràlia . La seva latitud i longitud són 34,06312149 i -118,2783975 respectivament. La segona adreça és Jersey City, Nova Jersey, EUA . La seva latitud i longitud són 40,71799929 i -74,04276812 respectivament.

A l'I generaré coordenades per a cadascuna de les adreces. Una coordenada és una combinació de latitud i longitud. Per generar una coordenada,

  • Escriviu la latitud d'una adreçaprimer.
  • A continuació, inseriu una coma.
  • Després escriviu la longitud de la mateixa adreça.

Per tant, la coordenada de la primera adreça és 34.0631214903094 ,-118,27839753751 . I la coordenada de la segona adreça és 40.7179992930381,-74.0427681204225 .

El codi VBA requereix una API d'un mapa per calcular la distància de conducció. L' API significa Interfície de programació d'aplicacions. Podeu utilitzar una API per connectar el Google Map o el Bing Map com vulgueu.

Però creant el Google L'API del mapa és de pagament. Al contrari, podeu crear una API del Bing MAP de forma gratuïta.

Per tant, estic utilitzant l' API de Bing MAP aquí.

  • Per crear una API Bing MAP gratuïta, feu clic aquí .

He creat un API . Adjunto l' API a continuació:

AhFG0hk5nKCcQlk80MRaSk1ZtoYUYsX98BCLWi7p7MKZ-VrzOWptdUwsvj9D3L9F

Ara és hora d'escriure el Codi VBA. Per això,

  • Premeu ALT + F11 per obrir l' Editor VBA .
  • Ara aneu a Insereix ➤ Mòdul per obrir un mòdul nou.

Després d'obrir l' Editor VBA , inseriu el següent Codi VBA al mòdul obert.

9641

Desglossament del codi

  • Aquí , he creat una funció definida per l'usuari anomenada Driving_Distance.
  • Després vaig utilitzar 3 paràmetres: startlocation , destinació ,i valor clau. Aquestes són la posició de les dues adreces i el valor de l' API , respectivament.
  • Després vaig utilitzar diverses variables com ara First_Value , Second_Value , Last_value , mitHTTP , & mitUrl. Aquestes variables s'utilitzen per emmagatzemar diferents valors.
  • Després es van combinar els valors (emmagatzemats a mitUrl ) i s'han utilitzat diversos mètodes d'objectes ( Open , SetRequestHeader , Send ). Així és com vaig aconseguir calcular la distància de conducció mitjançant l' API .

Aquest codi VBA genera una funció definida per l'usuari anomenada Driving_Distance .

La funció Driving_Distance requereix 3 arguments en total.

Aquí teniu la sintaxi genèrica de la funció Driving_Distance .

=Driving_Distance(Start_Location_Coordinate,End_Location_Coordinate, API)

Ara és hora d'aplicar la funció definida per l'usuari. Per això,

  • Seleccioneu la cel·la E10 .
  • A continuació, introduïu la fórmula següent:
=Driving_Distance(E5,E6,C8)

  • Ara, premeu ENTER .

Desglossament de la fórmula

  • E5 és la Coordenada_ubicació_inici .
  • E6 és la Coordenada_ubicació_final .
  • C8 és l' API del Bing MAP .

La funció calcula el distància de conducció entre dues adreces en milles. Comproveu la cel·la E10 . Veurà el número, 2790 .

Així que la distància en cotxe entre MacArthur Park,Camden NSW, Austràlia, i Jersey City, Nova Jersey, EUA són 2790 milles.

Llegiu-ne més: Com calcular la distància entre dues adreces a Excel (3 maneres)

Secció de pràctiques

Obtràu un full d'Excel com la captura de pantalla següent, al final del fitxer Excel proporcionat on podeu practicar tots els mètodes tractats en aquest article.

Conclusió

En resum, n'he comentat 2 maneres de calcular la distància de conducció entre dues adreces a Excel. I no dubteu a fer qualsevol pregunta a la secció de comentaris a continuació. Intentarem respondre a totes les consultes pertinents el més aviat possible. I si us plau, visiteu el nostre lloc web Exceldemy per explorar-ne més.

Publicació anterior Com calcular la puntuació T a Excel (4 maneres senzilles)
Següent post Com imprimir les cel·les seleccionades a Excel (6 maneres efectives)

Hugh West és un entrenador i analista d'Excel molt experimentat amb més de 10 anys d'experiència en el sector. És llicenciat en Comptabilitat i Finances i Màster en Administració i Direcció d'Empreses. Hugh té una passió per l'ensenyament i ha desenvolupat un enfocament pedagògic únic que és fàcil de seguir i entendre. El seu coneixement expert d'Excel ha ajudat a milers d'estudiants i professionals de tot el món a millorar les seves habilitats i a destacar en les seves carreres. A través del seu bloc, Hugh comparteix els seus coneixements amb el món, oferint tutorials d'Excel gratuïts i formació en línia per ajudar les persones i les empreses a assolir tot el seu potencial.