Sådan beregnes afstanden mellem to koordinater i Excel (2 metoder)

Hugh West

16-10-2023 Excel-formler
  • Del Dette
Hugh West

I mange tilfælde kan det være nødvendigt at finde afstand mellem to koordinater eller to steder. I Microsoft Excel kan du gøre dette i en stor mængde på kort tid. Denne artikel viser to metoder til at beregne afstanden mellem to koordinater i Excel.

Download arbejdsbog til øvelser

Du kan downloade øvelsesbogen fra nedenstående link.

Beregne afstand mellem to koordinater.xlsm

Grundlæggende om koordinatsystemer

Koordinatsystem er et system, især inden for geometri, der anvender et eller flere tal til at lokalisere et punkts position eller til at beregne andre geometriske parametre. Der findes mange slags koordinatsystemer, f.eks. kartesisk koordinatsystem, geodætisk koordinatsystem osv.

Hvad er det kartesiske koordinatsystem?

Det kartesiske koordinatsystem er et system, der anvender referenceakser til at lokalisere en position eller beregne geometriske data. Et punkts koordinater bestemmes ud fra afstanden mellem disse referenceakser. F.eks:

I et 2D-plan angiver X-aksen det horisontale plan og Y-aksen det vertikale plan. Så hvis nogen angiver koordinaterne for et punkt (2,3), betyder det, at punktet er 2 enheder fra det horisontale plan og 3 enheder fra det langsgående plan.

Afstandsformel for kartesisk koordinatsystem

Den aritmetiske formel til beregning af afstand i et 2-D kartesisk koordinatsystem er som følger:

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

Her,

  • x 1 = punkt 1's afstand fra x-aksen.
  • x 2 = punkt 2's afstand fra x-aksen.
  • y 1 = punkt 1's afstand fra y-aksen.
  • y 2 = punkt 2's afstand fra y-aksen.
  • d = afstanden mellem punkt 1 og punkt 2.

Hvad er et geodætisk koordinatsystem?

Geodætisk koordinatsystem er en type koordinatsystem, der bruger en ellipsoide som reference til at lokalisere et punkts position og måle andre geometriske parametre. Vi bruger almindeligvis breddegrad og længdegrad til at lokalisere positionen i dette koordinatsystem.

Her betyder breddegrad afstanden i nord- eller sydlig retning fra ækvator og længdegrad afstanden i øst- eller vestlig retning fra nulmeridianen. Positive værdier af breddegrad og længdegrad betyder henholdsvis nord og øst, og negative værdier betyder syd og vest.

Afstandsformel for det geodætiske koordinatsystem

Den aritmetiske formel til beregning af afstanden mellem to koordinater i det geodætiske koordinatsystem er som følger:

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

sin(radian(90-lat1))*sin(radian(90-lat2)*cos(radian(long1-long2)))*3959

Her,

  • lat1 = breddegrad for sted 1
  • lat2 = breddegrad for sted 2
  • long1 = længdegrad for sted 1
  • long2 = længdegrad for sted 2
  • d = afstand mellem sted 1 og sted 2 i miles

2 metoder til at beregne afstanden mellem to koordinater i Excel (kartesisk koordinatsystem)

Antag, at du har et datasæt, hvor du har koordinater for punkt 1 og punkt 2 i forskellige situationer, og du vil beregne afstanden mellem dem. Jeg vil nu vise dig to måder at gøre det på.

1. Brug af aritmetisk formel til at beregne afstanden

Du kan nemt beregne afstanden ved at indsætte den aritmetiske formel manuelt. Følg nu nedenstående trin for at beregne afstanden.

Trin :

  • Først skal du oprette en kolonne næste for Afstand.
  • Vælg derefter celle G6 og indsæt følgende formel.
=SQRT((E6-C6)^2 + (F6-D6)^2)

Her, G6 er startcellen for afstandskolonnen. Desuden, C6, D6, E6 og F6 celler angiver startcellen for x 1 , x 2 , y 1, og y 2 Her er der også SQRT-funktion bruges til at finde kvadratroden.

  • Til sidst skal du trække den Håndtag til påfyldning for resten af kolonnen, og du får dine afstande.

2. Anvendelse af VBA-kode til beregning af afstanden mellem to koordinater i Excel

Du kan også bruge VBA kode til at oprette en funktion til beregning af afstand i et kartesisk koordinatsystem og derefter bruge den til beregning. Følg nu nedenstående trin for at gøre det.

Trin :

  • Først skal du trykke på ALT + F11 for at åbne den VBA vindue.
  • Vælg nu Denne arbejdsbog og Højreklik på på den.
  • Vælg derefter sekventielt Indsæt > Modul .

  • På dette tidspunkt kopierer du følgende kode og indsætter den i det tomme felt. 
 'Denne kode vil oprette en funktion til beregning af afstand i kartesisk koordinatsystem Public Function DistCartesian(x1 As Double, y1 As Double, x2 As Double, x2 As Double, y2 As Double) 'Vi bruger den aritmetiske formel til beregning af afstand til at oprette funktionen A = (x2 - x1) ^ 2 + (y2 - y1) ^ 2 DistCartesian = Math.Sqr(A) End Function

  • Derefter skal du trykke på F5 for at køre koden. Her har denne kode oprettet en ny funktion DistCartesian til dig, som hjælper dig med at beregne afstanden mellem to koordinater i et kartesisk plan.
  • Vælg nu celle G6 og indsæt følgende formel.
=DistCartesian(C6,D6,E6,F6)

Her er argumenterne for denne funktion x 1 , y 1 , x 2, og y 2 henholdsvis.

  • Endelig skal du trække den Håndtag til påfyldning for de resterende celler.

Læs mere: Sådan beregnes afstanden mellem to GPS-koordinater i Excel

2 metoder til at beregne afstanden mellem to koordinater i Excel (geodætisk koordinatsystem)

Antag, at du i det geodætiske koordinatsystem har bredde- og længdegrader for to forskellige steder. Følg nu nedenstående trin for at beregne den afstanden mellem disse to steder .

1. Brug af aritmetisk formel til at beregne afstanden

En af de hurtigste måder at beregne afstanden på er ved at anvende den aritmetiske formel til manuel beregning af afstand. Følg nedenstående trin for at beregne afstanden mellem to koordinater i det geodætiske koordinatsystem.

Trin :

  • Først skal du tilføje en kolonne for Afstand (miles) .
  • Vælg derefter celle G6 og indsæt følgende formel.
=ACOS(COS(RADIANER(90-C6))*COS(RADIANER(90-E6))+SIN(RADIANER(90-C6))*SIN(RADIANER(90-E6))*COS(RADIANER(D6-F6)))*3959

Her, C6 , D6, E6, og F6 angiver de første celler for kolonnen af Breddegrad 1 (°) , Længdegrad 1 (°) , Breddegrad 2 (°), og Længdegrad 2 (°) henholdsvis.

⧬ Forklaring af formel

I denne formel:

  • RADIANS-funktion bruges til at konvertere en værdi i Grader (°) enhed til en værdi i Radian enhed.
  • COS-funktion bruges til at finde cosinus af en vinkel.
  • SIN-funktion bruges til at finde sinus af en vinkel.
  • ACOS-funktion bruges til at returnere arccosinus eller den omvendte cosinus af et tal.
  • Endelig er antallet 3959 ganges med til få afstanden i Miles . I stedet kan du ganges med 6371 for at få resultatet i Kilometer .

  • Endelig skal du trække den Håndtag til påfyldning for resten af klummen for at få dine afstande.

Læs mere: Sådan beregnes afstanden mellem to byer i Excel

2. Anvendelse af VBA-kode til beregning af afstanden mellem to koordinater i Excel

Du kan også bruge VBA kode til at oprette en funktion til beregning af afstand i et geodætisk koordinatsystem og derefter bruge den til beregning. Følg nedenstående trin for at gøre dette.

Trin :

  • Først skal du trykke på ALT + F11 for at åbne den VBA vindue.
  • Vælg nu Denne arbejdsbog og Højreklik på på den.
  • Vælg derefter sekventielt Indsæt > Modul .

  • Når du har indsat modulet, skal du kopiere følgende kode og indsætte den i det tomme felt. 
 'Denne kode vil skabe en funktion til at beregne afstand (miles) i geodætisk koordinatsystem 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))) 'Ændre 3959 til 6371 for at få dinresultat i kilometer DistGeo = .Acos(P * Q + R * S * T) * 3959 Slut med Slut funktion

  • På dette tidspunkt skal du trykke på F5 for at køre koden. Ved at gøre det, vil du oprette en ny funktion DistGeo som vil hjælpe dig med at beregne afstanden i en Geodætisk koordinatsystem .
  • Derefter skal du vælge celle G6 og skriv følgende formel ned.

=DistGeo(C6,D6,E6,F6)

Her skal argumenterne i den DistGeo funktion er Breddegrad 1 (°), længdegrad 1 (°), breddegrad 2 (°), og Længdegrad 2 (°) henholdsvis.

  • Endelig skal du trække den Håndtag til påfyldning for de resterende celler i kolonnen.

Læs mere: Sådan beregnes kørselsafstand mellem to adresser i Excel

Konklusion

Sidst men ikke mindst håber jeg, at du har fundet det, du søgte i denne artikel. Hvis du har spørgsmål, kan du skrive en kommentar nedenfor. Hvis du vil læse flere artikler som denne, kan du besøge vores hjemmeside ExcelWIKI .

Forrige indlæg Sådan indsætter du en samlet række i Excel (4 nemme metoder)
Næste indlæg Sådan tilføjer du enkelt citater i Excel (5 nemme metoder)

Hugh West er en meget erfaren Excel-træner og analytiker med over 10 års erfaring i branchen. Han har en bachelorgrad i regnskab og finans og en kandidatgrad i Business Administration. Hugh har en passion for undervisning og har udviklet en unik undervisningstilgang, der er nem at følge og forstå. Hans ekspertviden om Excel har hjulpet tusindvis af studerende og fagfolk verden over med at forbedre deres færdigheder og udmærke sig i deres karriere. Gennem sin blog deler Hugh sin viden med verden og tilbyder gratis Excel-tutorials og onlinetræning for at hjælpe enkeltpersoner og virksomheder med at nå deres fulde potentiale.