Sisukord
Paljudel juhtudel võib olla vaja leida kaugus kahe koordinaadi või kahe asukoha vahel. Microsoft Excelis saate seda teha hulgi suuruses lühikese aja jooksul. Selles artiklis näidatakse kahte meetodit kahe koordinaadi vahelise kauguse arvutamiseks Excelis.
Lae alla praktiline töövihik
Praktikaraamatu saate alla laadida allolevalt lingilt.
Kauguse arvutamine kahe koordinaadi vahel.xlsmKoordinaatsüsteemi alused
Koordinaatsüsteem on süsteem, eriti geomeetrias, mis kasutab punkti asukoha määramiseks või muude geomeetriliste parameetrite arvutamiseks ühte või mitut arvu. Koordinaatsüsteeme on mitmesuguseid. Näiteks: kartesiaanlik koordinaatsüsteem, geodeetiline koordinaatsüsteem jne.
Mis on kartesiaanlik koordinaatsüsteem?
Kartesiaanlik koordinaatsüsteem on süsteem, mis kasutab mis tahes asukoha määramiseks või mis tahes geomeetriliste andmete arvutamiseks võrdlustelge. Punkti koordinaadid määratakse nende võrdlustelgede kauguse põhjal. Näiteks:
2-D tasapinnal näitab X-telg horisontaaltasandit ja Y-telg vertikaaltasandit. Seega, kui keegi annab punkti koordinaadid (2,3), tähendab see, et punkt asub 2 ühikut horisontaaltasandist ja 3 ühikut pikitasandist.
Kauguse valem kartesiaanliku koordinaatsüsteemi jaoks
Aritmeetiline valem kauguse arvutamiseks 2-D kartesiaanlikus koordinaatsüsteemis on järgmine:
d=√((x2-x1)^2+(y2-y1)^2)
Siin,
- x 1 = punkti 1 kaugus x-teljest.
- x 2 = punkti 2 kaugus x-teljest.
- y 1 = punkti 1 kaugus y-teljest.
- y 2 = punkti 2 kaugus y-teljest.
- d = punkti 1 ja punkti 2 vaheline kaugus.
Mis on geodeetiline koordinaatsüsteem?
Geodeetiline koordinaatsüsteem on koordinaatsüsteemi tüüp, mis kasutab punkti asukoha määramiseks ja muude geomeetriliste parameetrite mõõtmiseks võrdlusalusena ellipsoidi. Selles koordinaatsüsteemis kasutatakse tavaliselt asukoha määramiseks laius- ja pikkuskraadi.
Siin tähendab laiuskraad kaugust põhja või lõuna suunas ekvaatorist ja pikkuskraad kaugust ida või lääne suunas nullmeridiaanist. Samuti tähendavad positiivsed laius- ja pikkuskraadide väärtused vastavalt põhja ja ida ning negatiivsed väärtused lõuna ja lääne suunas.
Kauguse valem geodeetilise koordinaatsüsteemi jaoks
Aritmeetiline valem kahe koordinaadi vahelise kauguse arvutamiseks geodeetilises koordinaatsüsteemis on järgmine:
d=acos(cos(radiaan(90-lat1))*cos(radiaan(90-lat2))+
sin(radiaan(90-lat1))*sin(radiaan(90-lat2)*cos(radiaan(long1-long2)))*3959
Siin,
- lat1 = asukoha 1 laiuskraad
- lat2 = asukoha 2 laiuskraad
- long1 = asukoha 1 pikkuskraad
- long2 = asukoha 2 pikkuskraad
- d = kaugus asukoha 1 ja asukoha 2 vahel miilides
2 meetodit kahe koordinaadi vahelise kauguse arvutamiseks Excelis (kartesiaanlik koordinaatsüsteem)
Oletame, et teil on andmestik, kus teil on punkti 1 ja punkti 2 koordinaadid erinevates olukordades ja te soovite arvutada nende vahelist kaugust. Nüüd näitan teile kaks võimalust, kuidas seda teha.
1. Aritmeetilise valemi kasutamine kauguse arvutamiseks
Saate hõlpsasti arvutada kauguse, sisestades aritmeetilise valemi käsitsi. Nüüd järgige kauguse arvutamiseks alljärgnevaid samme.
Sammud :
- Kõigepealt looge järgmine veerg Kaugus.
- Seejärel valige lahter G6 ja sisestage järgmine valem.
Siin, G6 on vahemaa veeru alustav lahter. Samuti, C6, D6, E6 ja F6. lahtrid tähistavad lähte lahtrit x 1 , x 2 , y 1, ja y 2 Samuti on siinkohal SQRT funktsioon kasutatakse ruutjuure leidmiseks.
- Lõpuks lohistage Täitmise käepide ülejäänud veeru jaoks ja saate oma vahemaad.
2. VBA-koodi rakendamine kahe koordinaadi vahelise kauguse arvutamiseks Excelis
Võite kasutada ka VBA koodi, et luua funktsioon vahemaa arvutamiseks kartesiaanlikus koordinaatsüsteemis ja seejärel kasutada seda arvutamiseks. Järgige nüüd selleks alljärgnevaid samme.
Sammud :
- Kõigepealt vajutage ALT + F11 avada VBA aken.
- Nüüd valige See töövihik ja Parema klõpsuga selle kohta.
- Seejärel valige järjestikku Sisesta > Moodul .
- Siinkohal kopeeri järgmine kood ja kleebi see tühja kasti.
'See kood loob funktsiooni kauguse arvutamiseks kartesiaanlikus koordinaatsüsteemis Public Function DistCartesian(x1 As Double, y1 As Double, x2 As Double, y2 As Double) 'Kasutame aritmeetilist valemit kauguse arvutamiseks, et luua funktsioon A = (x2 - x1) ^ 2 + (y2 - y1) ^ 2 DistCartesian = Math.Sqr(A) End Function
- Pärast seda vajutage F5 koodi käivitamiseks. Siin on see kood loonud uue funktsiooni DistCartesian mis aitab teil arvutada kahe koordinaadi vahemaad kartesiaanlikul tasandil.
- Nüüd valige lahter G6 ja sisestage järgmine valem.
Siin on selle funktsiooni argumendid järgmised x 1 , y 1 , x 2, ja y 2 vastavalt.
- Lõpuks lohistage Täitmise käepide ülejäänud rakkude puhul.
Loe edasi: Kuidas arvutada kahe GPS-koordinaadi vaheline kaugus Excelis
2 meetodit kahe koordinaadi vahelise kauguse arvutamiseks Excelis (geodeetiline koordinaatsüsteem)
Oletame, et teil on geodeetilises koordinaatsüsteemis kahe erineva asukoha laius- ja pikkuskraadid. Järgige nüüd alljärgnevaid samme, et arvutada nende kahe asukoha vaheline kaugus .
1. Aritmeetilise valemi kasutamine kauguse arvutamiseks
Üks kiiremaid viise vahemaa arvutamiseks on kauguse arvutamise aritmeetilise valemi kasutamine käsitsi. Järgige nüüd järgmisi samme, et arvutada kahe koordinaadi vaheline kaugus geodeetilises koordinaatsüsteemis.
Sammud :
- Kõigepealt lisage veerg Kaugus (miili) .
- Seejärel valige lahter G6 ja sisestage järgmine valem.
Siin, C6 , D6, E6, ja F6 tähistab veeru esimesi lahtreid Laiuskraad 1 (°) , Pikkuskraad 1 (°) , Laiuskraad 2 (°), ja Pikkuskraad 2 (°) vastavalt.
⧬ Valemi selgitus
Selles valemis:
- RADIANS funktsioon kasutatakse väärtuse teisendamiseks Kraadid (°) ühiku väärtusele Radian üksus.
- COS funktsioon kasutatakse nurga kosinuse leidmiseks.
- SIN funktsioon kasutatakse nurga siinuse leidmiseks.
- ACOS funktsioon kasutatakse arvu arkoosinuse või pöördkosinuse tagastamiseks.
- Lõpuks, number 3959 korrutatakse aadressile saada vahemaa sisse Miles Selle asemel võite korruta 6371-ga et saada tulemus Kilomeetrid .
- Lõpuks lohistage Täitmise käepide ülejäänud veeru jaoks, et saada oma vahemaad.
Loe edasi: Kuidas arvutada kahe linna vahelist kaugust Excelis
2. VBA-koodi rakendamine kahe koordinaadi vahelise kauguse arvutamiseks Excelis
Võite kasutada ka VBA koodi, et luua funktsioon kauguse arvutamiseks geodeetilises koordinaatsüsteemis ja seejärel kasutada seda arvutamiseks. Järgige nüüd selleks alljärgnevaid samme.
Sammud :
- Kõigepealt vajutage ALT + F11 avada VBA aken.
- Nüüd valige See töövihik ja Parema klõpsuga selle kohta.
- Seejärel valige järjestikku Sisesta > Moodul .
- Pärast mooduli sisestamist kopeeri järgmine kood ja kleebi see tühja kohta.
'See kood loob funktsiooni, mis arvutab vahemaa(miili) geodeetilises koordinaatsüsteemis 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)) 'Muuda 3959 6371-ks, et saada omatulemus kilomeetrites DistGeo = .Acos(P * Q + R * S * T) * 3959 End With End Function
- Sel hetkel vajutage F5 koodi käivitamiseks. Seda tehes loote uue funktsiooni DistGeo mis aitab teil arvutada kaugust Geodeetiline koordinaatsüsteem .
- Pärast seda valige lahter G6 ja kirjutage üles järgmine valem.
=DistGeo(C6,D6,E6,F6)
Siinkohal on argumendid DistGeo funktsioon on 1. laiuskraad (°), 1. pikkuskraad (°), 2. laiuskraad (°), ja Pikkuskraad 2 (°) vastavalt.
- Lõpuks lohistage Täitmise käepide veeru ülejäänud lahtritele.
Loe edasi: Kuidas arvutada sõidu kaugust kahe aadressi vahel Excelis
Kokkuvõte
Lõpetuseks, ma loodan, et leidsite sellest artiklist selle, mida otsisite. Kui teil on küsimusi, palun kirjutage kommentaar allpool. Kui soovite lugeda rohkem artikleid nagu see, võite külastada meie veebisait ExcelWIKI .