Hoe afstand tussen twee coördinaten te berekenen in Excel (2 methoden)

  • Deel Dit
Hugh West

In veel gevallen moet u afstand vinden tussen twee coördinaten of twee locaties. In Microsoft Excel kunt u dit in korte tijd massaal doen. Dit artikel demonstreert twee methoden om de afstand tussen twee coördinaten te berekenen in Excel.

Download Praktijk Werkboek

U kunt het oefenboek downloaden via onderstaande link.

Afstand tussen twee coördinaten berekenen.xlsm

Grondbeginselen van het coördinatenstelsel

Coördinatenstelsel is een systeem, vooral in de meetkunde, dat een of meer getallen gebruikt om de positie van een punt te bepalen of om andere meetkundige parameters te berekenen. Er zijn vele soorten coördinatenstelsels, bijvoorbeeld: Cartesisch coördinatenstelsel, Geodetisch coördinatenstelsel enz.

Wat is het Cartesisch coördinatenstelsel?

Het Cartesisch coördinatenstelsel is een systeem dat referentieassen gebruikt om een positie te bepalen of geometrische gegevens te berekenen. De coördinaten van een punt worden bepaald op basis van de afstand van die referentieassen. Bijvoorbeeld:

In een 2-D vlak geeft de X-as het horizontale vlak aan en de Y-as het verticale vlak. Als iemand dus de coördinaten van een punt (2,3) geeft, betekent dit dat het punt 2 eenheden van het horizontale vlak en 3 eenheden van het langsvlak ligt.

Afstandsformule voor cartesisch coördinatenstelsel

De rekenkundige formule voor het berekenen van de afstand in een 2-D Cartesisch coördinatenstelsel is als volgt:

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

Hier,

  • x 1 = Afstand van punt 1 tot de x-as.
  • x 2 = Afstand van punt 2 tot de x-as.
  • y 1 = Afstand van punt 1 tot de y-as.
  • y 2 = Afstand van punt 2 tot de y-as.
  • d = Afstand tussen punt 1 en punt 2.

Wat is geodetisch coördinatenstelsel?

Geodetisch coördinatenstelsel is een type coördinatenstelsel dat een ellipsoïde als referentie gebruikt om de positie van een punt te bepalen en andere geometrische parameters te meten. Wij gebruiken gewoonlijk breedtegraad en lengtegraad om de positie in dit coördinatenstelsel te bepalen.

Hier betekent breedtegraad de afstand in noordelijke of zuidelijke richting tot de evenaar en lengtegraad de afstand in oostelijke of westelijke richting tot de nulmeridiaan. Ook betekenen positieve waarden van breedtegraad en lengtegraad respectievelijk noord en oost en negatieve waarden respectievelijk zuid en west.

Afstandsformule voor geodetisch coördinatenstelsel

De rekenkundige formule om de afstand tussen twee coördinaten in het geodetisch coördinatenstelsel te berekenen is als volgt:

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

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

Hier,

  • lat1 = Breedtegraad van plaats 1
  • lat2 = Breedtegraad van plaats 2
  • lang1 = Lengtegraad van plaats 1
  • lang2 = Lengtegraad van plaats 2
  • d = Afstand tussen plaats 1 en plaats 2 in mijlen

2 Methoden om de afstand tussen twee coördinaten te berekenen in Excel (cartesisch coördinatenstelsel)

Stel, u hebt een dataset met coördinaten van punt 1 en punt 2 in verschillende situaties en u wilt de afstand tussen die punten berekenen. Ik zal u nu twee manieren tonen om dat te doen.

1. Rekenkundige formule gebruiken om afstand te berekenen

U kunt de afstand gemakkelijk berekenen door de rekenkundige formule handmatig in te voegen. Volg nu de onderstaande stappen om de afstand te berekenen.

Stappen :

  • Maak eerst een kolom aan voor Afstand.
  • Selecteer vervolgens cel G6 en voeg de volgende formule toe.
=SQRT((E6-C6)^2 + (F6-D6)^2)

Hier, G6 is de startcel voor de afstandskolom. Ook, C6, D6, E6 en F6. cellen geven de startcel aan voor x 1 , x 2 , y 1, en y 2 respectievelijk. Ook de SQRT-functie wordt gebruikt om de vierkantswortel te vinden.

  • Sleep ten slotte de Vulgreep voor de rest van de kolom en je krijgt je afstanden.

2. VBA-code toepassen om de afstand tussen twee coördinaten in Excel te berekenen

U kunt ook VBA code om een functie te maken voor het berekenen van de afstand in een cartesisch coördinatenstelsel en deze vervolgens te gebruiken voor de berekening. Volg nu de onderstaande stappen om dit te doen.

Stappen :

  • Druk eerst op ALT + F11 om de VBA raam.
  • Selecteer nu Dit werkboek en Rechts klikken erop.
  • Selecteer vervolgens achtereenvolgens Plaats > Module .

  • Kopieer nu de volgende code en plak die in het lege vak.
 'Deze code maakt een functie voor het berekenen van afstanden in het cartesiaanse coördinatenstelsel Publieke functie DistCartesian(x1 als Double, y1 als Double, x2 als Double, y2 als Double) 'We gebruiken de rekenkundige formule voor het berekenen van afstanden om de functie A = (x2 - x1) ^ 2 + (y2 - y1) ^ 2 DistCartesian = Math.Sqr(A) End Function 

  • Druk daarna op F5 om de code uit te voeren. Hier heeft deze code een nieuwe functie gecreëerd DistCartesian waarmee je de afstand tussen twee coördinaten in een cartesisch vlak kunt berekenen.
  • Selecteer nu cel G6 en voeg de volgende formule toe.
=DistCartesian(C6,D6,E6,F6)

Hier zijn de argumenten van deze functie x 1 , y 1 , x 2, en y 2 respectievelijk.

  • Sleep tenslotte de Vulgreep voor de overige cellen.

Lees meer: Hoe de afstand tussen twee GPS-coördinaten te berekenen in Excel

2 Methoden om de afstand tussen twee coördinaten te berekenen in Excel (geodetisch coördinatenstelsel)

Stel dat u in het geodetisch coördinatenstelsel de breedte- en lengtegraad van twee verschillende locaties hebt. Volg nu de onderstaande stappen om de afstand tussen die twee locaties .

1. Rekenkundige formule gebruiken om afstand te berekenen

Een van de snelste manieren om de afstand te berekenen is door de rekenkundige formule voor het berekenen van afstanden handmatig te gebruiken. Volg nu de onderstaande stappen om de afstand tussen twee coördinaten in het geodetisch coördinatenstelsel te berekenen.

Stappen :

  • Voeg eerst een kolom toe voor Afstand (Miles) .
  • Selecteer vervolgens cel G6 en voeg de volgende formule toe.
=ACOS(COS(RADIALEN(90-C6))*COS(RADIALEN(90-E6))+SIN(RADIALEN(90-C6))*SIN(RADIALEN(90-E6))*COS(RADIALEN(D6-F6)))*3959

Hier, C6 , D6, E6, en F6 geven de eerste cellen aan voor de kolom van Breedtegraad 1 (°) , Lengtegraad 1 (°) , Breedtegraad 2 (°), en Lengtegraad 2 (°) respectievelijk.

Formule Uitleg

In deze formule:

  • RADIANS functie wordt gebruikt om een waarde in de Graden (°) eenheid naar een waarde in de Radiant eenheid.
  • COS-functie wordt gebruikt om de cosinus van een hoek te vinden.
  • SIN-functie wordt gebruikt om de sinus van een hoek te vinden.
  • ACOS-functie wordt gebruikt om de arccosinus of inverse cosinus van een getal terug te geven.
  • Tenslotte, het aantal 3959 wordt vermenigvuldigd naar de afstand in Miles In plaats daarvan kun je vermenigvuldigen met 6371 om het resultaat te krijgen in Kilometers .

  • Sleep tenslotte de Vulgreep voor de rest van de column om je afstanden te krijgen.

Lees meer: Hoe de afstand tussen twee steden te berekenen in Excel

2. VBA-code toepassen om de afstand tussen twee coördinaten in Excel te berekenen

U kunt ook VBA code om een functie te maken voor het berekenen van de afstand in een geodetisch coördinatenstelsel en deze vervolgens te gebruiken voor de berekening. Volg nu de onderstaande stappen om dit te doen.

Stappen :

  • Druk eerst op ALT + F11 om de VBA raam.
  • Selecteer nu Dit werkboek en Rechts klikken erop.
  • Selecteer vervolgens achtereenvolgens Plaats > Module .

  • Nadat u de module hebt ingevoegd, kopieert u de volgende code en plakt u die in de lege ruimte.
 Deze code maakt een functie om de afstand (mijlen) in het geodetisch coördinatenstelsel te berekenen Publieke functie DistGeo(Lati1 als Double, Longi1 als Double, Lati2 als Double, Longi2 als Double) Met 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)) 'Verander 3959 in 6371 om uwresultaat in KiloMeter DistGeo = .Acos(P * Q + R * S * T) * 3959 Einde Met Einde Functie 

  • Druk nu op F5 om de code uit te voeren. Daarmee creëer je een nieuwe functie DistGeo waarmee u de afstand kunt berekenen in een Geodetisch coördinatenstelsel .
  • Selecteer daarna de cel G6 en schrijf de volgende formule op.

=DistGeo(C6,D6,E6,F6)

Hier zijn de argumenten van de DistGeo functie zijn Breedtegraad 1 (°), lengtegraad 1 (°), breedtegraad 2 (°), en Lengtegraad 2 (°) respectievelijk.

  • Sleep tenslotte de Vulgreep voor de overige cellen van de kolom.

Lees meer: Hoe de rijafstand tussen twee adressen te berekenen in Excel

Conclusie

Last but not the least, ik hoop dat u in dit artikel gevonden hebt wat u zocht. Als u nog vragen hebt, kunt u hieronder een reactie achterlaten. Als u meer artikelen als deze wilt lezen, kunt u onze website bezoeken ExcelWIKI .

Hugh West is een zeer ervaren Excel-trainer en -analist met meer dan 10 jaar ervaring in de branche. Hij heeft een bachelor in Accounting en Finance en een master in Business Administration. Hugh heeft een passie voor lesgeven en heeft een unieke lesaanpak ontwikkeld die gemakkelijk te volgen en te begrijpen is. Zijn deskundige kennis van Excel heeft duizenden studenten en professionals over de hele wereld geholpen hun vaardigheden te verbeteren en uit te blinken in hun carrière. Via zijn blog deelt Hugh zijn kennis met de wereld en biedt hij gratis Excel-tutorials en online trainingen aan om individuen en bedrijven te helpen hun volledige potentieel te bereiken.