Kuinka laskea etäisyys kahden koordinaatin välillä Excelissä (2 menetelmää)

Hugh West

16-10-2023 Excel-kaavat
  • Jaa Tämä
Hugh West

Monissa tapauksissa saatat joutua löytää etäisyys kahden koordinaatin tai kahden paikan välillä. Microsoft Excelissä voit tehdä tämän suuressa määrin lyhyessä ajassa. Tässä artikkelissa esitellään kaksi menetelmää kahden koordinaatin välisen etäisyyden laskemiseksi Excelissä.

Lataa harjoituskirja

Voit ladata harjoituskirjan alla olevasta linkistä.

Laske etäisyys kahden koordinaatin välillä.xlsm

Koordinaattijärjestelmän perusteet

Koordinaattijärjestelmä on erityisesti geometriassa käytettävä järjestelmä, jossa käytetään yhtä tai useampaa numeroa pisteen sijainnin määrittämiseen tai muiden geometristen parametrien laskemiseen. Koordinaattijärjestelmiä on monenlaisia, esimerkiksi kartesiokoordinaattijärjestelmä, geodeettinen koordinaattijärjestelmä jne.

Mikä on kartesiolainen koordinaattijärjestelmä?

Kartesiolainen koordinaattijärjestelmä on järjestelmä, joka käyttää vertailuakseleita minkä tahansa sijainnin paikantamiseen tai minkä tahansa geometrisen tiedon laskemiseen. Pisteen koordinaatit määritetään näiden vertailuakselien etäisyyden perusteella. Esimerkiksi:

Kaksiulotteisessa tasossa X-akseli tarkoittaa vaakatasoa ja Y-akseli pystytasoa. Jos siis joku antaa pisteen koordinaatit (2,3), se tarkoittaa, että piste on 2 yksikköä vaakatasosta ja 3 yksikköä pitkittäistasosta.

Etäisyyskaava kartesiankoordinaattijärjestelmässä

Aritmeettinen kaava etäisyyden laskemiseksi 2D-kartesiokoordinaatistossa on seuraava:

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

Tässä,

  • x 1 = Pisteen 1 etäisyys x-akselista.
  • x 2 = Pisteen 2 etäisyys x-akselista.
  • y 1 = Pisteen 1 etäisyys y-akselista.
  • y 2 = Pisteen 2 etäisyys y-akselista.
  • d = pisteen 1 ja pisteen 2 välinen etäisyys.

Mikä on geodeettinen koordinaattijärjestelmä?

Geodeettinen koordinaatisto on koordinaatistojärjestelmä, jossa käytetään ellipsoidia pisteen sijainnin määrittämiseen ja muiden geometristen parametrien mittaamiseen. Tässä koordinaatistossa sijainnin määrittämiseen käytetään yleensä leveys- ja pituusasteita.

Tässä leveysaste tarkoittaa etäisyyttä päiväntasaajalta pohjoiseen tai etelään ja pituusaste etäisyyttä päämeridiaanista itään tai länteen. Lisäksi leveysasteen ja pituusasteen positiiviset arvot tarkoittavat pohjoista ja itää ja negatiiviset arvot vastaavasti etelää ja länttä.

Geodeettisen koordinaattijärjestelmän etäisyyskaava

Aritmeettinen kaava kahden koordinaatin välisen etäisyyden laskemiseksi geodeettisessa koordinaattijärjestelmässä on seuraava:

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

sin(radiaani(90-leveysaste1))*sin(radiaani(90-leveysaste2)*cos(radiaani(pituus1-pituus2)))*3959

Tässä,

  • lat1 = sijainnin 1 leveysaste
  • lat2 = sijainnin 2 leveysaste
  • long1 = sijainnin 1 pituusaste
  • long2 = sijainnin 2 pituusaste
  • d = sijainnin 1 ja sijainnin 2 välinen etäisyys maileina.

2 menetelmää kahden koordinaatin välisen etäisyyden laskemiseksi Excelissä (kartesiallinen koordinaattijärjestelmä)

Oletetaan, että sinulla on tietokokonaisuus, jossa on pisteen 1 ja pisteen 2 koordinaatit eri tilanteissa ja haluat laskea niiden välisen etäisyyden. Näytän sinulle kaksi tapaa tehdä se.

1. Aritmeettisen kaavan käyttäminen etäisyyden laskemiseen.

Voit helposti laskea etäisyyden lisäämällä aritmeettisen kaavan manuaalisesti. Seuraa nyt alla olevia ohjeita etäisyyden laskemiseksi.

Askeleet :

  • Luo ensin seuraava sarake sarakkeelle Etäisyys.
  • Valitse seuraavaksi solu G6 ja lisää seuraava kaava.
=SQRT((E6-C6)^2 + (F6-D6)^2)

Tässä, G6 on etäisyyssarakkeen aloitussolu. Lisäksi, C6, D6, E6 ja F6. solut osoittavat lähtösolun x 1 , x 2 , y 1, ja y 2 Myös tässä tapauksessa SQRT-funktio käytetään neliöjuuren löytämiseen.

  • Vedä lopuksi Täyttökahva sarakkeen loppuosa ja saat etäisyydet.

2. VBA-koodin soveltaminen kahden koordinaatin välisen etäisyyden laskemiseen Excelissä

Voit myös käyttää VBA koodia luodaksesi funktion etäisyyden laskemiseksi kartesiankoordinaatistossa ja käyttääksesi sitä sitten laskemiseen. Noudata nyt alla olevia vaiheita tehdessäsi näin.

Askeleet :

  • Paina ensin ALT + F11 avataksesi VBA ikkuna.
  • Valitse nyt Tämä työkirja ja Klikkaa hiiren kakkospainikkeella sen päälle.
  • Valitse seuraavaksi peräkkäin Lisää > Moduuli .

  • Kopioi tässä vaiheessa seuraava koodi ja liitä se tyhjään ruutuun. 
 'Tämä koodi luo funktion etäisyyden laskemiseen kartesiankoordinaatistossa Public Function DistCartesian(x1 As Double, y1 As Double, x2 As Double, y2 As Double) 'Käytämme aritmeettista kaavaa etäisyyden laskemiseen luodaksemme funktion A = (x2 - x1) ^ 2 + (y2 - y1) ^ 2 DistCartesian = Math.Sqr(A) End Function

  • Paina sen jälkeen F5 Tässä koodissa on luotu uusi funktio nimeltä DistCartesian joka auttaa sinua laskemaan kahden koordinaatin välisen etäisyyden kartesiittisessa tasossa.
  • Valitse nyt solu G6 ja lisää seuraava kaava.
=DistCartesian(C6,D6,E6,F6)

Tämän funktion argumentit ovat x 1 , y 1 , x 2, ja y 2 vastaavasti.

  • Vedä lopuksi Täyttökahva loput solut.

Lue lisää: Kuinka laskea kahden GPS-koordinaatin välinen etäisyys Excelissä?

2 tapaa laskea etäisyys kahden koordinaatin välillä Excelissä (geodeettinen koordinaattijärjestelmä)

Oletetaan, että sinulla on geodeettisessa koordinaattijärjestelmässä kahden eri paikan leveys- ja pituusasteet. Laske nyt alla olevien ohjeiden mukaisesti seuraavat arvot näiden kahden paikan välinen etäisyys .

1. Aritmeettisen kaavan käyttäminen etäisyyden laskemiseen.

Yksi nopeimmista tavoista laskea etäisyys on aritmeettisen kaavan käyttäminen etäisyyden laskemiseen manuaalisesti. Seuraa nyt alla olevia ohjeita laskeaksesi kahden koordinaatin välisen etäisyyden geodeettisessa koordinaattijärjestelmässä.

Askeleet :

  • Lisää ensin sarake Etäisyys (mailia) .
  • Valitse sitten solu G6 ja lisää seuraava kaava.
=ACOS(COS(RADIAANI(90-C6))*COS(RADIAANI(90-E6))+SIN(RADIAANI(90-C6))*SIN(RADIAANI(90-E6))*COS(RADIAANI(D6-F6)))*3959

Tässä, C6 , D6, E6, ja F6 osoittavat sarakkeen ensimmäiset solut Leveysaste 1 (°) , Pituusaste 1 (°) , Leveysaste 2 (°), ja Pituusaste 2 (°) vastaavasti.

⧬ Kaavan selitys

Tässä kaavassa:

  • RADIANS-toiminto käytetään muuntamaan arvo Astetta (°) yksikön arvoon Radian yksikkö.
  • COS-toiminto käytetään kulman kosinuksen määrittämiseen.
  • SIN-toiminto käytetään kulman sinin määrittämiseen.
  • ACOS-toiminto käytetään palauttamaan luvun arkkosinus tai käänteiskosinus.
  • Lopuksi määrä 3959 kerrotaan osoitteeseen saada etäisyys Miles Sen sijaan voit kerrotaan luvulla 6371 saadaksesi tuloksen Kilometrit .

  • Vedä lopuksi Täyttökahva kolumnin loppuosa, jotta saat etäisyyksiäsi.

Lue lisää: Kuinka laskea kahden kaupungin välinen etäisyys Excelissä

2. VBA-koodin soveltaminen kahden koordinaatin välisen etäisyyden laskemiseen Excelissä

Voit myös käyttää VBA koodia luodaksesi funktion etäisyyden laskemiseksi geodeettisessa koordinaattijärjestelmässä ja käyttääksesi sitä sitten laskemiseen. Noudata nyt alla olevia vaiheita tehdessäsi näin.

Askeleet :

  • Paina ensin ALT + F11 avataksesi VBA ikkuna.
  • Valitse nyt Tämä työkirja ja Klikkaa hiiren kakkospainikkeella sen päälle.
  • Valitse seuraavaksi peräkkäin Lisää > Moduuli .

  • Kun olet lisännyt moduulin, kopioi seuraava koodi ja liitä se tyhjään tilaan. 
 'Tämä koodi luo funktion, joka laskee etäisyyden (mailit) geodeettisessa koordinaatistossa 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)) 'Vaihda 3959 arvoon 6371 saadaksesi tulokseksitulos kilometreinä DistGeo = .Acos(P * Q + R * S * T) * 3959 End With End Function

  • Paina tässä vaiheessa F5 Näin luodaan uusi funktio, joka on nimeltään DistGeo joka auttaa sinua laskemaan etäisyyden Geodeettinen koordinaattijärjestelmä .
  • Valitse sen jälkeen solu G6 ja kirjoita seuraava kaava.

=DistGeo(C6,D6,E6,F6)

Tässä yhteydessä perustelujen DistGeo toiminto ovat Leveyspiiri 1 (°), pituuspiiri 1 (°), leveyspiiri 2 (°), ja Pituusaste 2 (°) vastaavasti.

  • Vedä lopuksi Täyttökahva sarakkeen jäljellä oleville soluille.

Lue lisää: Kuinka laskea ajoetäisyys kahden osoitteen välillä Excelissä?

Päätelmä

Viimeisenä mutta ei vähäisimpänä toivon, että löysit etsimäsi tästä artikkelista. Jos sinulla on kysyttävää, kommentoi alla. Jos haluat lukea lisää tämän kaltaisia artikkeleita, voit vierailla verkkosivuillamme. ExcelWIKI .

Edellinen viesti Kuinka lisätä Excelin kokonaisrivi (4 helppoa menetelmää)
Seuraava postaus Miten lisätä yksittäisiä lainausmerkkejä Excelissä (5 helppoa menetelmää)

Hugh West on erittäin kokenut Excel-kouluttaja ja analyytikko, jolla on yli 10 vuoden kokemus alalta. Hän on koulutukseltaan laskentatoimen ja rahoituksen kandidaatti sekä kauppatieteiden maisteri. Hughilla on intohimo opettamiseen, ja hän on kehittänyt ainutlaatuisen opetusmenetelmän, jota on helppo seurata ja ymmärtää. Hänen asiantuntemuksensa Excelistä on auttanut tuhansia opiskelijoita ja ammattilaisia ​​maailmanlaajuisesti parantamaan taitojaan ja menestymään urallaan. Blogissaan Hugh jakaa tietämyksensä maailman kanssa tarjoamalla ilmaisia ​​Excel-opetusohjelmia ja verkkokoulutusta auttaakseen yksilöitä ja yrityksiä saavuttamaan täyden potentiaalinsa.