Turinys
Kasdieniame gyvenime jaučiame būtinybę atstumo matavimas tiek daug kartų. Tai nėra taip sunku apskaičiuoti atstumą tarp dviejų GPS koordinačių programoje "Excel . Ketinu paaiškinti 2 paprastus būdus, kaip apskaičiuoti atstumą tarp dviejų GPS koordinačių programoje "Excel .
Kad būtų aiškiau, naudosiu duomenų rinkinį, kurį sudaro Platuma ir vietos ilgumos reikšmės Praha, Čekija , ir Zalcburgas, Austrija .
Atsisiųsti praktikos sąsiuvinį
Atstumo tarp dviejų GPS koordinačių apskaičiavimas.xlsm2 paprasti būdai, kaip apskaičiuoti atstumą tarp dviejų GPS koordinačių programoje "Excel
1. Aritmetinės formulės naudojimas atstumui tarp dviejų GPS koordinačių apskaičiuoti
Aritmetinės formulės naudojimas yra greičiausias ir paprasčiausias būdas apskaičiuoti atstumą tarp dviejų GPS koordinačių . Dabar atlikite šiuos veiksmus.
Žingsniai :
- Sukurkite naują eilutę pavadinimu Atstumas (mylios) .
- Pasirinkite ląstelę, kurioje bus taikoma ši formulė:
=ACOS(COS(RADIANS(90-C5))*COS(RADIANS(90-C6))+SIN(RADIANS(90-C5))*SIN(RADIANS(90-C6))*COS(RADIANS(D5-D6)))*3959 Čia,
- Svetainė Radianinė funkcija konvertuoja vertę į Studijų laipsnis vienetų į vertę Radian vienetas.
- Svetainė ACOS funkcija grąžina atvirkštinį skaičiaus kosinusą.
Formulės suskirstymas
COS(RADIANS(90-C5))*COS(RADIANS(90-C6))+SIN(RADIANS(90-C5))*SIN(RADIANS(90-C6))*COS(RADIANS(D5-D6)) - šioje dalyje vertė pateikiama naudojant trigonometrijos operatorius.
Išvestis: 0.999092512926254
ACOS(0.999092512926254) - ACOS funkcija grąžina atvirkštinę kosinuso vertę.
Išvestis: 0.0426057358212635
0.0426057358212635 *3959 - Daugyba 3959 konvertuoja vertę į Miles .
Išvestis: 168.676108116382
- Galiausiai paspauskite ĮVESKITE kad gautumėte rezultatą.
Taigi, galime apskaičiuoti atstumą tarp dviejų GPS koordinačių gana lengvai.
Skaityti daugiau: Kaip apskaičiuoti atstumą tarp dviejų miestų programoje "Excel
2. VBA naudojimas atstumui tarp dviejų GPS koordinačių apskaičiuoti
Taip pat galime naudoti VBA į apskaičiuoti atstumą tarp dviejų GPS koordinačių . Tai protingiausias būdas tai padaryti.
Žingsniai :
- Pirmiausia eikite į Kūrėjas skirtukas.
- Pasirinkite "Visual Basic iš juostelės.
- Dabar spustelėkite Įdėkite .
- Tada paspauskite Modulis .
- Dabar tuščioje vietoje įveskite šį VBA kodą:
Public Function DistCalc(Prague_Lati As Double, Prague_Longi As Double, Salzburg_Lati As Double, Salzburg_Longi As Double) With WorksheetFunction M = Cos(.Radians(90 - Prague_Lati)) N = Cos(.Radians(90 - Salzburg_Lati)) O = Sin(.Radians(90 - Prague_Lati)) P = Sin(.Radians(90 - Salzburg_Lati)) Q = Cos(.Radians(Prague_Longi - Salzburg_Longi)) 'Change 6371į 3959, kad gautumėte rezultatą myliomis DistCalc = .Acos(M * N + O * P * Q) * 6371 End With End Function 
Pirma, čia naudojau viešosios funkcijos procedūrą DistCalc . Tada nustačiau keletą kintamųjų M, N, O, P, ir Q su tam tikromis reikšmėmis. Aš paminėjau tinkamą santykį tarp kintamųjų apibrėžti DistCalc Funkcija.
- Dabar pasirinkite langelį, kuriame bus matomas išmatuotas rezultatas (t. y. C8 ).
- Taikykite šią formulę:
=DistCalc(C5,D5,C6,D6) Čia Funkcija DistCalc įvertina atstumas tarp dviejų taškų .
- Galiausiai paspauskite ĮVESKITE .
Tai puikiausias būdas apskaičiuoti atstumą tarp dviejų GPS koordinačių .
Skaityti daugiau: Kaip apskaičiuoti atstumą tarp dviejų adresų "Excel" programoje (3 būdai)
Praktikos skyrius
Čia galite pasipraktikuoti, kad įgytumėte daugiau patirties.
Išvada
Šiame straipsnyje bandžiau pateikti 2 paprastus būdus, kaip apskaičiuoti atstumą tarp dviejų GPS koordinačių programoje "Excel . tikiuosi, kad tai bus naudinga visiems. Jei turite papildomų klausimų, komentuokite toliau.
