Как да изчислим разстоянието между две координати в Excel (2 метода)

Hugh West

16-10-2023 Формули на Excel
  • Споделя Това
Hugh West

Съдържание

В много случаи може да се наложи да намиране на разстояние между две координати или две местоположения. В Microsoft Excel можете да направите това в насипно състояние в рамките на кратък период от време. Тази статия демонстрира два метода за изчисляване на разстоянието между две координати в Excel.

Изтегляне на работна тетрадка за практика

Можете да изтеглите учебника за упражнения от връзката по-долу.

Изчисляване на разстоянието между две координати.xlsm

Основи на координатната система

Координатна система е система, особено в геометрията, която използва едно или повече числа за определяне на местоположението на дадена точка или за изчисляване на други геометрични параметри. Съществуват много видове координатни системи. Например: декартова координатна система, геодезическа координатна система и др.

Какво представлява декартовата координатна система?

Декартовата координатна система е система, която използва референтни оси за определяне на местоположението или за изчисляване на геометрични данни. Координатите на дадена точка се определят от разстоянието между тези референтни оси:

В двуизмерна равнина оста X обозначава хоризонталната равнина, а оста Y - вертикалната равнина. Така че, ако някой даде координатите на точка (2,3), това означава, че точката се намира на 2 единици от хоризонталната равнина и на 3 единици от надлъжната равнина.

Формула за разстоянието за декартова координатна система

Аритметичната формула за изчисляване на разстоянието в двумерна декартова координатна система е следната:

d=√((x2-x1)^2+(y2-y1)^2)

Тук,

  • x 1 = Разстояние на точка 1 от оста x.
  • x 2 = Разстояние на точка 2 от оста x.
  • y 1 = Разстояние на точка 1 от оста y.
  • y 2 = Разстояние на точка 2 от оста y.
  • d = Разстояние между точка 1 и точка 2.

Какво представлява геодезическата координатна система?

Геодезическата координатна система е вид координатна система, която използва елипсоид като референтна точка за определяне на местоположението на дадена точка и измерване на други геометрични параметри. Обикновено използваме географска ширина и дължина за определяне на местоположението в тази координатна система.

Тук географската ширина означава разстоянието в северна или южна посока от екватора, а географската дължина - разстоянието в източна или западна посока от главния меридиан. Освен това положителните стойности на географската ширина и дължина означават съответно север и изток, а отрицателните - юг и запад.

Формула за разстоянието за геодезическа координатна система

Аритметичната формула за изчисляване на разстоянието между две координати в геодезическата координатна система е следната:

d=acos(cos(radian(90-lat1))*cos(radian(90-lat2))+

sin(radian(90-lat1))*sin(radian(90-lat2)*cos(radian(long1-long2)))*3959

Тук,

  • лат1 = географска ширина на местоположение 1
  • лат2 = географска ширина на местоположение 2
  • long1 = Дължина на местоположение 1
  • long2 = Дължина на местоположение 2
  • d = Разстояние между местоположение 1 и местоположение 2 в мили

2 метода за изчисляване на разстоянието между две координати в Excel (декартова координатна система)

Да предположим, че имате набор от данни, в който има координати на точка 1 и точка 2 в различни ситуации и искате да изчислите разстоянието между тях. Сега ще ви покажа два начина за това.

1. Използване на аритметична формула за изчисляване на разстоянието

Можете лесно да изчислите разстоянието, като вмъкнете аритметичната формула ръчно. Сега следвайте стъпките по-долу, за да изчислите разстоянието.

Стъпки :

  • Първо, създайте колона следваща за Разстояние.
  • След това изберете клетка G6 и въведете следната формула.
=SQRT((E6-C6)^2 + (F6-D6)^2)

Тук, G6 е началната клетка на колоната за разстояние. Също така, C6, D6, E6 и F6 клетките показват началната клетка за x 1 , x 2 , y 1, и y 2 Също така, тук Функция SQRT се използва за намиране на квадратен корен.

  • Накрая плъзнете Дръжка за пълнене за останалата част от колоната и ще получите разстоянията.

2. Прилагане на код VBA за изчисляване на разстоянието между две координати в Excel

Можете също така да използвате VBA код, за да създадете функция за изчисляване на разстоянието в картезианска координатна система и след това да я използвате за изчисление. Сега следвайте стъпките по-долу, за да направите това.

Стъпки :

  • Първо, натиснете ALT + F11 за да отворите VBA прозорец.
  • Сега изберете Тази работна книга и Кликване с десния бутон на мишката върху него.
  • След това последователно изберете Вмъкване на > Модул .

  • В този момент копирайте следния код и го поставете в празното поле. 
 'Този код ще създаде функция за изчисляване на разстоянието в декартова координатна система Public Function DistCartesian(x1 As Double, y1 As Double, x2 As Double, y2 As Double) 'Използваме аритметичната формула за изчисляване на разстоянието, за да създадем функцията A = (x2 - x1) ^ 2 + (y2 - y1) ^ 2 DistCartesian = Math.Sqr(A) End Function

  • След това натиснете F5 за да стартирате кода. Тук този код е създал нова функция DistCartesian за вас, който ще ви помогне да изчислите разстоянието между две координати в картезианска равнина.
  • Сега изберете клетка G6 и въведете следната формула.
=DistCartesian(C6,D6,E6,F6)

Тук аргументите на тази функция са x 1 , y 1 , x 2, и y 2 съответно.

  • Накрая плъзнете Дръжка за пълнене за останалите клетки.

Прочетете още: Как да изчислим разстоянието между две GPS координати в Excel

2 метода за изчисляване на разстоянието между две координати в Excel (геодезическа координатна система)

Да предположим, че в геодезическата координатна система разполагате с географската ширина и дължина на две различни места. Сега следвайте стъпките по-долу, за да изчислите разстояние между тези две места .

1. Използване на аритметична формула за изчисляване на разстоянието

Един от най-бързите начини за изчисляване на разстоянието е ръчното въвеждане на аритметичната формула за изчисляване на разстоянието. Сега следвайте стъпките по-долу, за да изчислите разстоянието между две координати в геодезическата координатна система.

Стъпки :

  • Първо, добавете колона за Разстояние (мили) .
  • След това изберете клетка G6 и въведете следната формула.
=ACOS(COS(РАДИАНС(90-C6))*COS(РАДИАНС(90-E6))+SIN(РАДИАНС(90-C6))*SIN(РАДИАНС(90-E6))*COS(РАДИАНС(D6-F6)))*3959

Тук, C6 , D6, E6, и F6 посочват първите клетки за колоната на Географска ширина 1 (°) , Дължина 1 (°) , Географска ширина 2 (°), и Дължина 2 (°) съответно.

⧬ Обяснение на формулата

В тази формула:

  • Функция RADIANS се използва за преобразуване на стойност в Градуси (°) към стойност в Radian единица.
  • Функция COS се използва за намиране на косинус на ъгъл.
  • Функция SIN се използва за намиране на синуса на даден ъгъл.
  • Функция на ACOS се използва за връщане на аркосинус или обратен косинус на дадено число.
  • Накрая, броят на 3959 се умножава към да получите разстоянието в Майлс . Вместо това можете да умножете по 6371 за да получите резултата в Километри .

  • Накрая плъзнете Дръжка за пълнене за останалата част от колоната, за да получите разстоянията.

Прочетете още: Как да изчислим разстоянието между два града в Excel

2. Прилагане на код VBA за изчисляване на разстоянието между две координати в Excel

Можете също така да използвате VBA код, за да създадете функция за изчисляване на разстоянието в геодезическа координатна система и след това да я използвате за изчисление. Сега следвайте стъпките по-долу, за да го направите.

Стъпки :

  • Първо, натиснете ALT + F11 за да отворите VBA прозорец.
  • Сега изберете Тази работна книга и Кликване с десния бутон на мишката върху него.
  • След това последователно изберете Вмъкване на > Модул .

  • След като вмъкнете модула, копирайте следния код и го поставете в празното пространство. 
 'Този код ще създаде функция за изчисляване на разстоянието (мили) в геодезическа координатна система Public Function DistGeo(Lati1 As Double, Longi1 As Double, Lati2 As Double, Longi2 As Double) With WorksheetFunction P = Cos(.Radians(90 - Lati1)) Q = Cos(.Radians(90 - Lati2)) R = Sin(.Radians(90 - Lati1)) S = Sin(.Radians(90 - Lati2)) T = Cos(.Radians(Longi1 - Longi2)) 'Променете 3959 на 6371, за да получите вашитерезултат в километри DistGeo = .Acos(P * Q + R * S * T) * 3959 End With End Function

  • В този момент натиснете F5 за да стартирате кода. По този начин ще създадете нова функция DistGeo която ще ви помогне да изчислите разстоянието в Геодезическа координатна система .
  • След това изберете клетка G6 и запишете следната формула.

=DistGeo(C6,D6,E6,F6)

Тук аргументите на DistGeo функция са Географска ширина 1 (°), Географска дължина 1 (°), Географска ширина 2 (°), и Дължина 2 (°) съответно.

  • Накрая плъзнете Дръжка за пълнене за останалите клетки на колоната.

Прочетете още: Как да изчислим разстоянието между два адреса в Excel

Заключение

Накрая, но не на последно място, се надявам, че сте намерили това, което сте търсили от тази статия. Ако имате някакви въпроси, моля, напишете коментар по-долу. Ако искате да прочетете още статии като тази, можете да посетите нашия уебсайт ExcelWIKI .

Предишна публикация Как да вмъкнете общ ред в Excel (4 лесни метода)
Следваща публикация Как да добавяте единични кавички в Excel (5 лесни метода)

Хю Уест е опитен обучител и анализатор на Excel с над 10 години опит в индустрията. Има бакалавърска степен по счетоводство и финанси и магистърска степен по бизнес администрация. Хю има страст към преподаването и е разработил уникален подход на преподаване, който е лесен за следване и разбиране. Неговите експертни познания по Excel са помогнали на хиляди студенти и професионалисти по целия свят да подобрят уменията си и да постигнат отлични резултати в кариерата си. Чрез своя блог Хю споделя знанията си със света, като предлага безплатни уроци за Excel и онлайн обучение, за да помогне на хората и фирмите да достигнат пълния си потенциал.