Két koordináta közötti távolság kiszámítása Excelben (2 módszer)

Hugh West

16-10-2023 Excel képletek
  • Ossza Meg Ezt
Hugh West

Sok esetben szükség lehet arra, hogy távolság keresése két koordináta vagy két hely között. A Microsoft Excelben ezt tömegesen, rövid idő alatt megteheti. Ez a cikk két módszert mutat be két koordináta közötti távolság kiszámítására az Excelben.

Gyakorlati munkafüzet letöltése

A gyakorlókönyvet az alábbi linkről töltheti le.

Két koordináta közötti távolság kiszámítása.xlsm

A koordinátarendszer alapjai

A koordinátarendszer olyan rendszer, különösen a geometriában, amely egy vagy több számot használ egy pont helyzetének meghatározására vagy más geometriai paraméterek kiszámítására. Sokféle koordinátarendszer létezik. Például: kartéziánus koordinátarendszer, geodéziai koordinátarendszer stb.

Mi a kartéziánus koordinátarendszer?

A kartéziánus koordináta-rendszer egy olyan rendszer, amely referencia tengelyeket használ bármely pozíció meghatározására vagy bármely geometriai adat kiszámítására. Egy pont koordinátáit e referencia tengelyek távolságából határozzuk meg. Például:

Egy kétdimenziós síkban az X-tengely a vízszintes síkot, az Y-tengely pedig a függőleges síkot jelöli. Ha tehát valaki megadja egy pont koordinátáit (2,3), az azt jelenti, hogy a pont a vízszintes síkból 2 egységre, a hosszanti síkból pedig 3 egységre van.

Távolsági képlet a kartéziánus koordinátarendszerhez

A távolság kiszámításának aritmetikai képlete egy 2D-s kartéziánus koordinátarendszerben a következő:

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

Tessék,

  • x 1 = Az 1. pont távolsága az x tengelytől.
  • x 2 = A 2. pont távolsága az x tengelytől.
  • y 1 = Az 1. pont távolsága az y tengelytől.
  • y 2 = A 2. pont távolsága az y tengelytől.
  • d = Az 1. és a 2. pont közötti távolság.

Mi a geodéziai koordinátarendszer?

A geodéziai koordinátarendszer egy olyan koordinátarendszer, amely egy ellipszoidot használ referenciaként egy pont helyzetének meghatározásához és más geometriai paraméterek méréséhez. Általában a földrajzi szélességet és hosszúságot használjuk a helyzet meghatározásához ebben a koordinátarendszerben.

Itt a szélesség az Egyenlítőtől északi vagy déli irányban mért távolságot, a hosszúság pedig a főmeridiántól kelet vagy nyugat irányban mért távolságot jelenti. A szélesség és a hosszúság pozitív értékei északot és keletet, a negatív értékek pedig délit és nyugatot jelentenek.

Távolsági képlet a geodéziai koordinátarendszerhez

A geodéziai koordináta-rendszerben két koordináta közötti távolság kiszámításához használt aritmetikai képlet a következő:

d=acos(cos(cos(radián(90-szélesség1))*cos(radián(90-szélesség2))+

sin(radián(90-szélesség1))*sin(radián(90-szélesség2)*cos(radián(hosszú1-hosszú2)))*3959

Tessék,

  • lat1 = Az 1. hely földrajzi szélessége
  • lat2 = A 2. hely földrajzi szélessége
  • long1 = Az 1. hely földrajzi hosszúsága
  • long2 = A 2. hely földrajzi hosszúsága
  • d = Az 1. és a 2. hely közötti távolság mérföldben kifejezve

2 módszer két koordináta közötti távolság kiszámítására az Excelben (kartézi koordináta rendszer)

Tegyük fel, hogy van egy adathalmazod, ahol az 1. és a 2. pont koordinátái különböző helyzetekben vannak, és ki akarod számítani a köztük lévő távolságot. Most két módszert mutatok erre.

1. Aritmetikai képlet használata a távolság kiszámításához

A távolságot könnyen kiszámíthatja a számtani képlet kézi beillesztésével. Most kövesse az alábbi lépéseket a távolság kiszámításához.

Lépések :

  • Először hozzon létre egy oszlopot a következő Távolság.
  • Ezután válassza ki a cellát G6 és illessze be a következő képletet.
=SQRT((E6-C6)^2 + (F6-D6)^2)

Tessék, G6 a távolság oszlop kezdő cellája. Továbbá, C6, D6, E6, és F6 cellák jelzik a kiindulási cellát a x 1 , x 2 , y 1, és y 2 Szintén itt a SQRT függvény a négyzetgyök megtalálására szolgál.

  • Végül húzza a Töltse ki a fogantyút az oszlop többi részéhez, és megkapja a távolságokat.

2. VBA-kód alkalmazása két koordináta közötti távolság kiszámításához Excelben

Használhatja a VBA kódot, hogy hozzon létre egy függvényt a távolság kiszámítására egy kartéziánus koordinátarendszerben, majd használja azt a számításhoz. Most kövesse az alábbi lépéseket ehhez.

Lépések :

  • Először nyomja meg a ALT + F11 a VBA ablak.
  • Most válassza ki a Ez a munkafüzet és Jobb klikk a rajta.
  • Ezután egymás után válassza ki Beillesztés > Modul .

  • Ekkor másolja ki a következő kódot, és illessze be az üres mezőbe. 
 'Ez a kód létrehoz egy függvényt a távolság kiszámítására a kartéziánus koordinátarendszerben Public Function DistCartesian(x1 As Double, y1 As Double, x2 As Double, y2 As Double) 'A távolság kiszámítására szolgáló aritmetikai képletet használjuk az A = (x2 - x1) ^ 2 + (y2 - y1) ^ 2 függvény létrehozásához DistCartesian = Math.Sqr(A) End Function

  • Ezután nyomja meg a F5 Itt ez a kód egy új függvényt hozott létre, amely a DistCartesian amely segít kiszámítani két koordináta közötti távolságot egy kartéziánus síkban.
  • Most válassza ki a cellát G6 és illessze be a következő képletet.
=DistCartesian(C6,D6,E6,F6)

Itt a függvény argumentumai a következők x 1 , y 1 , x 2, és y 2 illetve.

  • Végül húzza a Töltse ki a fogantyút a fennmaradó cellák esetében.

Bővebben: Hogyan számítsuk ki a távolságot két GPS-koordináta között az Excelben

2 módszer két koordináta közötti távolság kiszámítására Excelben (geodéziai koordináta rendszer)

Tegyük fel, hogy a geodéziai koordináta-rendszerben két különböző hely földrajzi szélessége és hosszúsága áll rendelkezésünkre. Most az alábbi lépésekkel kiszámíthatjuk a következő értékeket a két hely közötti távolság .

1. Aritmetikai képlet használata a távolság kiszámításához

A távolság kiszámításának egyik leggyorsabb módja a távolság számtani képletének kézi számítása. Most kövesse az alábbi lépéseket két koordináta közötti távolság kiszámításához a geodéziai koordinátarendszerben.

Lépések :

  • Először adjunk hozzá egy oszlopot a Távolság (mérföld) .
  • Ezután válassza ki a cellát G6 és illessze be a következő képletet.
=ACOS(COS(COS(RADIÁN(90-C6))*COS(RADIÁN(90-E6))+SIN(RADIÁN(90-C6))*SIN(RADIÁN(90-E6))*COS(RADIÁN(D6-F6)))*3959

Tessék, C6 , D6, E6, és F6 az oszlop első celláit jelöli a 1. szélességi fok (°) , Hosszúság 1 (°) , 2. szélességi fok (°), és Hosszúság 2 (°) illetve.

⧬ Képlet magyarázat

Ebben a képletben:

  • RADIANS funkció értékek konvertálására szolgál a Fok (°) egység egy értékre a Radian egység.
  • COS funkció egy szög koszinuszának meghatározására szolgál.
  • SIN funkció egy szög szinuszának meghatározására szolgál.
  • ACOS funkció egy szám arccosinusának vagy inverz koszinuszának visszaadására szolgál.
  • Végül, a szám 3959 megszorozva a címre. megkapja a távolságot Miles . Ehelyett, akkor szorozzuk meg 6371-gyel hogy az eredményt a Kilométerek .

  • Végül húzza a Töltse ki a fogantyút az oszlop többi részéhez, hogy megkapja a távolságokat.

Bővebben: Hogyan számítsuk ki a távolságot két város között az Excelben

2. VBA-kód alkalmazása két koordináta közötti távolság kiszámításához Excelben

Használhatja a VBA kódot, hogy hozzon létre egy függvényt a távolság kiszámításához egy geodéziai koordináta-rendszerben, majd használja azt a számításhoz. Most kövesse az alábbi lépéseket ehhez.

Lépések :

  • Először nyomja meg a ALT + F11 a VBA ablak.
  • Most válassza ki a Ez a munkafüzet és Jobb klikk a rajta.
  • Ezután egymás után válassza ki Beillesztés > Modul .

  • A modul beillesztése után másolja ki a következő kódot, és illessze be az üres helyre. 
 'Ez a kód létrehoz egy függvényt a távolság(mérföldek) kiszámítására geodéziai koordináta rendszerben 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)) 'Változtassuk a 3959-et 6371-re, hogy megkapjuk az Öneredmény KiloMéterben DistGeo = .Acos(P * Q + R * S * T) * 3959 End With End Function

  • Ekkor nyomja meg a F5 Ezzel egy új függvényt hoz létre, amely a kód futtatásához szükséges. DistGeo amely segít kiszámítani a távolságot egy Geodéziai koordinátarendszer .
  • Ezután válassza ki a cellát G6 és írja le a következő képletet.

=DistGeo(C6,D6,E6,F6)

Itt az érvek a DistGeo funkció a következők 1. szélességi fok (°), 1. hosszúsági fok (°), 2. szélességi fok (°), és Hosszúság 2 (°) illetve.

  • Végül húzza a Töltse ki a fogantyút az oszlop fennmaradó celláira.

Bővebben: Hogyan számítsuk ki a két cím közötti távolságot az Excelben

Következtetés

Végül, de nem utolsó sorban, remélem, megtalálta, amit keresett ebből a cikkből. Ha bármilyen kérdése van, kérjük, írjon egy megjegyzést az alábbiakban. Ha még több ilyen cikket szeretne olvasni, akkor látogasson el weboldalunkra. ExcelWIKI .

Előző poszt Hogyan illesszünk be egy teljes sort az Excelben (4 egyszerű módszer)
Következő bejegyzés Hogyan adjunk hozzá egyetlen idézőjelet az Excelben (5 egyszerű módszer)

Hugh West nagy tapasztalattal rendelkező Excel-oktató és elemző, több mint 10 éves tapasztalattal az iparágban. Számvitel és pénzügy szakos alapdiplomát, valamint üzleti adminisztrációból mesterképzést szerzett. Hugh szenvedélye a tanítás, és egyedülálló tanítási megközelítést dolgozott ki, amely könnyen követhető és érthető. Az Excelben szerzett szakértői tudása világszerte több ezer diáknak és szakembernek segített abban, hogy készségeiket és karrierjüket kiválóan teljesítsék. Hugh blogján keresztül megosztja tudását a világgal, ingyenes Excel-oktatóanyagokat és online képzéseket kínálva, hogy segítse az egyéneket és a vállalkozásokat teljes potenciáljuk kibontakoztatásában.