Como calcular a distancia de condución entre dous enderezos en Excel

Hugh West

29-09-2023 Fórmulas Excel
  • Comparte Isto
Hugh West

Microsoft Excel é un programa de follas de cálculo moi versátil. Ofrece facer unha gama tan ampla de tarefas que nin sequera podes imaxinar. Incluso pode calcular a distancia de condución entre dous enderezos en Excel. Se tes unha lista de enderezos para atopar a diferenza entre eles, por suposto podes usar MS Excel. Tamén pode calcular a distancia manualmente. Pero iso levará demasiado tempo. Como tes centos de miles de distancias para calcular. Así, neste artigo mostrarei como calcular a distancia de conducción entre dous enderezos en Excel.

Descargar o libro de prácticas

Podes descargar o ficheiro de Excel dende a seguinte ligazón e practicar xunto con it.

Calcular a distancia de conducción entre dous enderezos.xlsm

2 formas eficaces de calcular a distancia de conducción entre dous enderezos en Excel

1 . Usando funcións trigonométricas para calcular a distancia de conducción

Aquí mostrarei como combinar diferentes funcións trigonométricas para calcular a distancia de conducción entre dous enderezos en Excel.

Para dar ti un exemplo, tomei dous enderezos. O primeiro enderezo é MacArthur Park, Camden NSW, Australia . A súa latitude e lonxitude son 34,06312149 e -118,2783975 respectivamente. O segundo enderezo é Jersey City, Nova Jersey, EUA . A súa latitude e lonxitude son 40,71799929 e -74,04276812 respectivamente.

Agora, combinarei os ACOS , COS , SIN e & RADIANOS funcións para crear unha fórmula. A fórmula calculará efectivamente a distancia de conducción entre dous enderezos en millas.

Para iso,

❶ Seleccione primeiro a cela D8 .

❷ Despois insira. a seguinte fórmula na cela.

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

❸ Despois diso, prema o botón ENTER .

Agora verás que a fórmula calculou a distancia de conducción entre MacArthur Park, Camden NSW, Australia e Jersey City, Nova Jersey, EUA en millas. Así, verá o resultado na cela D8 que é 2445,270922 millas.

Desglose da fórmula

  • COS(RADIANS(90-C6)) *COS(RADIANS(90-C5)) – as funcións RADIANS converte os valores en radiáns e a función COS proporciona o coseno dos valores, os cosenos da latitude multiplícanse entón. Saída – 0,365377540842758
  • COS(RADIANS(D6-D5)) : proporciona o valor coseno para a diferenza de lonxitude entre os dous enderezos. Saída – 0,716476936499882
  • SIN(RADIANS(90-C6)) *SIN(RADIANS(90-C5)) – calcula o desvío de lonxitudes a partir de 90 radiáns e multiplicou os valores do seno. Saída – 0,627884682513118
  • SIN(RADIANOS(90-C6)) *SIN(RADIANOS(90-C5)) *COS(RADIANOS(D6-) D5)) – pasa a ser0,627884682513118 * 0,716476936499882. Saída – 0,449864893802199
  • COS(RADIANOS(90-C6)) *COS(RADIANOS(90-C5)) +SIN(RADIANOS(90-) C6)) *SIN(RADIANOS(90-C5)) *COS(RADIANOS(D6-D5)) – pasa a ser 0,365377540842758 * 0,449864893802199. Saída – 0,815242434644958
  • A continuación, a función ACOS arcosina o valor. Saída – 0,617648629071256
  • Finalmente, multiplicando o valor por 3959 – 0,617648629071256 *3959 proporciona o resultado en millas. Saída – 2445.270922

Ler máis: Como calcular millas entre dous enderezos en Excel (2 métodos)

2. Calcula a distancia de conducción entre dous enderezos usando o código VBA

Nesta sección, usarei un código VBA para crear unha función definida polo usuario. Despois usarei esa función para calcular a distancia de conducción entre dous enderezos en Excel.

Aquí estou usando dous enderezos. O primeiro enderezo é MacArthur Park, Camden NSW, Australia . A súa latitude e lonxitude son 34,06312149 e -118,2783975 respectivamente. O segundo enderezo é Jersey City, Nova Jersey, EUA . A súa latitude e lonxitude son 40,71799929 e -74,04276812 respectivamente.

No I xerarei coordenadas para cada un dos enderezos. Unha coordenada é unha combinación de latitude e lonxitude. Para xerar unha coordenada,

  • Escriba a latitude dun enderezoprimeiro.
  • A continuación insira unha coma.
  • Despois escriba a lonxitude do mesmo enderezo.

Así que a coordenada do primeiro enderezo é 34.0631214903094 ,-118,27839753751 . E a coordenada do segundo enderezo é 40.7179992930381,-74.0427681204225 .

O código VBA require unha API dun mapa para calcular a distancia de conducción. A API son as siglas de Application Programming Interface. Podes usar unha API para conectar o Mapa de Google ou o Mapa de Bing o que prefieras.

Pero creando o Google Map API é de pago. Pola contra, pode crear unha API do Bing MAP de balde.

Por iso, estou usando a API de Bing MAP aquí.

  • Para crear unha API Bing MAP gratuíta, faga clic aquí .

Creei un API . Adxunto a API a continuación:

AhFG0hk5nKCcQlk80MRaSk1ZtoYUYsX98BCLWi7p7MKZ-VrzOWptdUwsvj9D3L9F

Agora, é hora de escribir o Código VBA . Para iso,

  • Preme ALT + F11 para abrir o Editor VBA .
  • Agora vai a Inserir ➤ Módulo para abrir un novo módulo.

Despois de abrir o Editor VBA , insira o seguinte Código VBA no módulo aberto.

8439

Desglose do código

  • Aquí , creei unha función definida polo usuario chamada Distancia_de_condución.
  • Entón usei 3 parámetros: startlocation , destino ,e clave-valor. Estas son a posición dos dous enderezos e o valor da API respectivamente.
  • Entón usei varias variables como First_Value , Second_Value , Último_valor , mitHTTP , & mitUrl. Estas variables úsanse para almacenar diferentes valores.
  • A continuación combináronse os valores (almacenados en mitUrl ) e utilizáronse varios métodos de obxecto ( Abrir , SetRequestHeader , Enviar ). Así é como conseguín calcular a distancia de conducción a través da API .

Este código VBA xera unha función definida polo usuario chamada Distancia_de_condución .

A función Distancia_de_conducción require 3 argumentos en total.

Aquí está a sintaxe xenérica da función Distancia_de_condución .

=Driving_Distance(Start_Location_Coordinate,End_Location_Coordinate, API)

Agora é o momento de aplicar a función definida polo usuario. Para iso,

  • Seleccione a cela E10 .
  • A continuación insira a seguinte fórmula:
=Driving_Distance(E5,E6,C8)

  • Agora, preme ENTER .

Desglose da fórmula

  • E5 é a Coordenada_Localización_Inicial .
  • E6 é a Coordenada_Localización_Final .
  • C8 é a API do Bing MAP .

A función calcula o distancia de condución entre dous enderezos en millas. Comprobe a cela E10 . Verá o número, 2790 .

Entón, a distancia en coche entre MacArthur Park,Camden NSW, Australia, e Jersey City, Nova Jersey, EUA son 2790 millas.

Ler máis: Como calcular a distancia entre dous enderezos en Excel (3 xeitos)

Sección de práctica

Recibirás unha folla de Excel como a seguinte captura de pantalla, ao final do ficheiro de Excel proporcionado onde podes practicar todos os métodos que se comentan neste artigo.

Conclusión

Para resumir, comentei 2 formas de calcular a distancia de condución entre dous enderezos en Excel. E non dubides en facer calquera pregunta na sección de comentarios a continuación. Intentaremos responder a todas as consultas pertinentes o antes posible. E visita o noso sitio web Exceldemy para explorar máis.

Publicación anterior Como calcular a puntuación T en Excel (4 xeitos sinxelos)
Próxima publicación Como imprimir as celas seleccionadas en Excel (6 xeitos eficaces)

Hugh West é un adestrador e analista de Excel altamente experimentado con máis de 10 anos de experiencia na industria. É Licenciado en Contabilidade e Finanzas e Máster en Administración de Empresas. Hugh ten unha paixón polo ensino e desenvolveu un enfoque docente único que é fácil de seguir e comprender. O seu coñecemento experto de Excel axudou a miles de estudantes e profesionais de todo o mundo a mellorar as súas habilidades e a destacar nas súas carreiras. A través do seu blog, Hugh comparte os seus coñecementos co mundo, ofrecendo titoriais de Excel gratuítos e formación en liña para axudar ás persoas e ás empresas a alcanzar todo o seu potencial.