Как рассчитать расстояние между двумя координатами в 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
  • длинный1 = Долгота местоположения 1
  • длинный2 = долгота местоположения 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(RADIANS(90-C6))*COS(RADIANS(90-E6))+SIN(RADIANS(90-C6))*SIN(RADIANS(90-E6))*COS(RADIANS(D6-F6)))*3959

Вот, C6 , D6, E6, и F6 указывают первые ячейки для столбца Широта 1 (°) , Долгота 1 (°) , Широта 2 (°), и Долгота 2 (°) соответственно.

⧬ Объяснение формулы

В этой формуле:

  • Функция РАДИАНС используется для преобразования значения в Градусы (°) единицу к значению в Радиан единица.
  • Функция 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 и онлайн-обучение, чтобы помочь отдельным лицам и компаниям полностью раскрыть свой потенциал.