Het artikel laat zien hoe u de afstand tussen twee adressen in Excel. Microsoft Excel heeft deze coole speciale functie en formule voor het vinden van de afstand tussen twee plaatsen in de wereld. Als je GPS Coördinaten van twee plaatsen, kun je gemakkelijk bepaal de afstand tussen die plaatsen in elke gewenste eenheid.

Download Praktijk werkboek

Afstand tussen twee adressen berekenen.xlsm

3 manieren om de afstand tussen twee adressen in Excel te berekenen

In onze dataset hebben we Breedtegraad en Lengtegraad voor Ohio en Alaska We gaan de afstand tussen hen meten.

De Latitudes voor Ohio en Alaska zijn 40.4173 Noord en 64.2008 Noord respectievelijk. Ook de Lengtegraden voor Ohio en Alaska zijn 82.9071 West en 149.4937 West respectievelijk.

1. Haversinusformule gebruiken om afstand tussen twee adressen te berekenen

Als je goed bent in wiskunde, met behulp van Haversine Formule zal perfect voor je zijn. Hoewel het een benaderend resultaat geeft, is het een vrij goed resultaat.

Allereerst moeten we de basisformule van booglengte En met behulp van die formule vergelijken we die met de afstand tussen twee plaatsen op aarde. De formule staat hieronder.

S = rθ

S = afstand tussen twee adressen

r = straal van de aarde

θ = Hoek die door de twee adressen in het middelpunt van de aarde wordt geïntroduceerd

Maar als je GPS Coördinaten van twee plaatsen, moet u van de Haversine Formule Kijk naar de Haversine Formule hieronder weergegeven.

Als je dit vergelijkt met de formule voor booglengte krijg je zoals in de volgende afbeelding.

Laten we u kennis laten maken met de parameters van de Haversine Formule .

φ ₁ = Breedtegraad van de eerste plaats

φ ₂ = Breedtegraad van de tweede plaats

ℽ ₁ = Lengtegraad van de eerste plaats

ℽ ₂ = Breedtegraad van de tweede plaats

Nu laat ik u zien hoe u deze formule stap voor stap toepast in Excel.

Stappen:

• Maak eerst een cel om de afstandswaarde in op te slaan en typ de volgende formule in de cel C8 .

=2*6400*ASIN(SQRT((SIN(C6-C5)/2)^2+COS(C5)*COS(C6)*(SIN(D6-D5)/2)^2))

De formule gebruikt ASIN , SQRT , SIN en COS functies Het is vrij eenvoudig als je gewoon kijkt naar de Haversine Formule We meten de afstand in kilometers dus zetten we de straal van de aarde in kilometers en dat is 6400 km . ASIN verwijst naar de inverse sinus of de ArcSine Als we de parameterhoeken van de Haversine Formule met onze Excel formule, krijgen we,

₁ = Breedtegraad van Ohio (C5)

₂ = Breedtegraad van Alaska (C6)

ℽ ₁ = Lengtegraad van Ohio (D5)

ℽ ₂ = Breedtegraad van Alaska (D6)

• Druk daarna op de ENTER knop om de afstand tussen Ohio en Alaska in Kilometers .

• Daarna, als u wilt meet de afstand in mijlen gebruik de volgende formule in cel C8 .

=2*3959*ASIN(SQRT((SIN(C6-C5)/2)^2+COS(C5)*COS(C6)*(SIN(D6-D5)/2)^2))

Hier hebben we dezelfde Excel-formule gebruikt als voor de afstand in mijlen Daarom nemen we de straal van de aarde in mijlen dat is 3959 .

Zo kunt u de afstand tussen twee adressen van de aarde in Excel door toepassing van de Haversine Formule .

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

2. Excel CONCATENATE en SUBSTITUTE functies toepassen om de afstand tussen twee adressen te berekenen

U kunt een Google Kaart link om de afstand tussen twee adressen met behulp van Excel CONCATENATE en SUBSTITUTE Functies Laten we het proces hieronder doorlopen.

Stappen:

• Type eerst de volgende formule in C8 .

=CONCATENATE("//maps.google.co.uk/maps?f=d&source=s_d&saddr=", SUBSTITUTE(B5," ","+"),"&daddr=",SUBSTITUTE(B6," ","+"))

Deze formule maakt een Google Kaart link van hoe je kunt reizen van Ohio naar Alaska . de CONCATENATE functie zal de adressen in de link en de SUBSTITUTE functie zal de naam van de adressen .

• Druk vervolgens op de ENTER knop en u ziet de Google Kaart link in C8 .

• Gebruik daarna dit link in uw internet zoekbalk en u krijgt de afstand informatie over deze twee adressen .

Tenslotte kunt u de afstand tussen twee adressen van de aarde in Excel door toepassing van CONCATENATE en SUBSTITUTE functies.

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

3. VBA gebruiken om de afstand tussen twee adressen in Excel te berekenen

Een andere manier om te berekenen afstand tussen twee adressen zou kunnen door een API ( Toepassing Programmeer Interface ) link en het gebruiken om een Door de gebruiker gedefinieerde functie door VBA Je kunt een API link in Bing gratis. Om een Bing Kaart eigen API sleutel, klik hier .

Stappen:

• Ga eerst naar Ontwikkelaar >> Visual Basic .

• Selecteer daarna Plaats >> Module om de VBA-module .

• Typ later de volgende code in de VBA-module We creëren een Door de gebruiker gedefinieerde functie om te berekenen afstand in mijlen .

 Option Explicit Public Function DistanceInMiles(First_Location As String, _ Final_Location As String, Target_Value As String) Dim Initial_Point As String, Ending_Point As String, _ Distance_Unit As String, Setup_HTTP As Object, Output_Url As String Initial_Point = "//dev.virtualearth.net/REST/v1/Routes/DistanceMatrix?origins=" Ending_Point = "&destinations=" Distance_Unit ="&travelModus=driving&o=xml&key=" & Target_Value & "&distanceUnit=mi" Set Setup_HTTP = CreateObject("MSXML2.ServerXMLHTTP") Output_Url = Initial_Point & First_Location & Ending_Point & Final_Location & Distance_Unit Setup_HTTP.Open "GET", Output_Url, False Setup_HTTP.SetRequestHeader "User-Agent", "Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0)".Setup_HTTP.Send ("") DistanceInMiles = Round(Round(WorksheetFunction.FilterXML(Setup_HTTP.ResponseText, _ "//TravelDistance"), 3), 0) End Function 

Code Uitleg

• Eerst hebben we onze Functie als AfstandInMijlen We hebben ook 3 parameters: First_Location As String, Final_Location As String en Doel_Waarde Als String .
• Daarna verklaarden we Beginpunt , Eindpunt , Afstand_eenheid en Uitgaande_Url als String ; Setup_HTTP als Object .
• Later hebben we Beginpunt als het begin van de Url-link , Eindpunt als Bestemming en Afstand_eenheid naar Miles .
• Daarna stellen we de nodige parameters in om een relatie te leggen tussen onze VBA code en de API
• Tenslotte hebben wij onze Door de gebruiker gedefinieerde functie .

• Daarna hebben we volgens dezelfde procedures nog een Door de gebruiker gedefinieerde functie om de afstand te vinden in kilometers .

Je kunt zien dat we net de Afstand_eenheid naar kilometers .

• Daarna, in de volgende afbeelding, ziet u de API sleutel in cel C8 .

• Daarna typt u de volgende formule in de cel C8 .

=AfstandInMijlen(E5,E6,C8)

• Druk vervolgens op de ENTER knop en u ziet de afstand tussen Ohio en Alaska in mijlen .

• Gebruik daarna de volgende formule om de afstand in kilometer .

=AfstandInKM(E5,E6,C8)

U kunt dus de afstand tussen twee adressen met behulp van VBA en API sleutel.

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

Dingen om te onthouden

• Houd dat in gedachten, je moet ongeveer de juiste GPS Coördinaten van deze staat in de gegevens omdat je het internet gebruikt om de afstand te vinden. Als de staat zijn west aan de Meridiaan Lijn beide hun Lengtegraden zal negatief zijn.

Praktijk Sectie

In dit deel geef ik u de dataset van dit artikel, zodat u deze methoden zelf kunt oefenen.

Conclusie

Het volstaat te zeggen dat u zeer effectieve methoden zult leren voor het berekenen van afstand tussen twee adressen in Excel na het lezen van dit artikel. Als u betere methoden of vragen heeft of feedback over dit artikel, deel ze dan in het commentaarvak. Dit zal mij helpen mijn komende artikelen te verrijken. Voor meer vragen, bezoek dan onze website ExcelWIKI.com .