Microsoft Excel ist ein sehr vielseitiges Tabellenkalkulationsprogramm. Es bietet so viele Möglichkeiten, dass man es sich gar nicht vorstellen kann. Sie können sogar die Entfernung zwischen zwei Adressen in Excel berechnen. Wenn Sie eine Liste von Adressen haben, um den Unterschied zwischen ihnen zu ermitteln, können Sie natürlich MS Excel verwenden. Sie können die Entfernung auch manuell berechnen. Aber das ist zu zeitaufwändig. Da Sie eineIn diesem Artikel zeige ich Ihnen daher, wie Sie die Entfernung zwischen zwei Adressen in Excel berechnen können.

Download Arbeitsbuch Praxis

Sie können die Excel-Datei unter folgendem Link herunterladen und mit ihr üben.

2 effektive Methoden zur Berechnung der Fahrstrecke zwischen zwei Adressen in Excel

1. trigonometrische Funktionen zur Berechnung der Fahrstrecke verwenden

Hier werde ich Ihnen zeigen, wie Sie verschiedene trigonometrische Funktionen um die Fahrstrecke zwischen zwei Adressen in Excel zu berechnen.

Um Ihnen ein Beispiel zu geben, habe ich zwei Adressen genommen. Die erste Adresse lautet MacArthur Park, Camden NSW, Australien Seine Breiten- und Längengrade sind 34.06312149 und -118.2783975 Die zweite Adresse lautet Jersey City, New Jersey, USA Seine Breiten- und Längengrade sind 40.71799929 und -74.04276812 beziehungsweise.

Jetzt werde ich die ACOS , COS , SIN , & RADIANS um eine Formel zu erstellen, die die Entfernung zwischen zwei Adressen in Kilometern berechnet.

Dafür,

❶ Zelle auswählen D8 Erstens.

❷ Fügen Sie dann die folgende Formel in die Zelle ein.

❸ Drücken Sie danach die EINGEBEN Taste.

Sie werden sehen, dass die Formel die Fahrstrecke zwischen den folgenden Punkten berechnet hat MacArthur Park, Camden NSW, Australien, und Jersey City, New Jersey, USA In der Zelle wird das Ergebnis in Meilen angezeigt. D8 das ist 2445.270922 Meilen.

Formel Aufschlüsselung

• COS(BOGENMASS(90-C6)) *COS(BOGENMASS(90-C5)) - die RADIANS Funktionen wandeln die Werte in Bogenmaß um und die COS Funktion den Kosinus der Werte liefert, werden die Kosinuswerte für die geografische Breite dann multipliziert. Ausgabe - 0.365377540842758
• COS(BOGENMASS(D6-D5)) - liefert den Kosinuswert für den Längengradunterschied zwischen den beiden Adressen. Ausgabe - 0.716476936499882

• SIN(BOGENMASS(90-C6)) *SIN(BOGENMASS(90-C5)) - berechnet die Abweichung der Längengrade von 90 Bogenmaß und multipliziert die Sinuswerte. Ausgabe - 0.627884682513118

• SIN(BOGENMASS(90-C6)) *SIN(BOGENMASS(90-C5)) *COS(BOGENMASS(D6-D5)) - wird zu 0,627884682513118 * 0,716476936499882. Ausgabe - 0.449864893802199

• COS(RADIANT(90-C6)) *COS(RADIANT(90-C5)) +SIN(RADIANT(90-C6)) *SIN(RADIANT(90-C5)) *COS(RADIANT(D6-D5)) - wird zu 0,365377540842758 * 0,449864893802199. Ausgabe - 0.815242434644958

• Dann wird die ACOS Funktion arkosiniert den Wert. Ausgabe - 0.617648629071256

• Schließlich multipliziert man den Wert mit 3959 - 0.617648629071256 *3959 liefert das Ergebnis in Meilen. Ausgabe - 2445.270922

Lesen Sie mehr: Berechnung der Entfernung zwischen zwei Adressen in Excel (2 Methoden)

2. die Fahrstrecke zwischen zwei Adressen mit VBA-Code berechnen

In diesem Abschnitt werde ich eine VBA Code, um eine benutzerdefinierte Funktion zu erstellen, mit der ich dann die Entfernung zwischen zwei Adressen in Excel berechnen kann.

Hier verwende ich zwei Adressen: Die erste Adresse lautet MacArthur Park, Camden NSW, Australien Seine Breiten- und Längengrade sind 34.06312149 und -118.2783975 Die zweite Adresse lautet Jersey City, New Jersey, USA Seine Breiten- und Längengrade sind 40.71799929 und -74.04276812 beziehungsweise.

Im Folgenden werde ich für jede Adresse Koordinaten erstellen. Eine Koordinate ist eine Kombination aus Breiten- und Längengrad. Um eine Koordinate zu erstellen,

• Geben Sie zuerst den Breitengrad einer Adresse ein.
• Fügen Sie dann ein Komma ein.
• Danach geben Sie den Längengrad der gleichen Adresse ein.

Die Koordinate der ersten Adresse ist also 34.0631214903094,-118.27839753751 Und die Koordinate der zweiten Adresse lautet 40.7179992930381,-74.0427681204225 .

Die VBA Code erfordert eine API einer Karte, um die Fahrstrecke zu berechnen. Die API steht für Application Programming Interface. Sie können eine API um entweder die Google-Karte oder die Bing-Karte was auch immer Sie bevorzugen.

Aber die Erstellung der Google Map API Im Gegenteil: Sie können eine API der Bing MAP kostenlos.

Daher verwende ich die Bing MAP API hier.

• So erstellen Sie eine kostenlose Bing MAP API , hier klicken .

Ich habe eine API Ich füge die API unten:

Jetzt ist es an der Zeit, die VBA Code. Dafür,

• Presse ALT + F11 zum Öffnen des VBA-Editor .
• Gehen Sie nun zu einfügen. ➤ Modul um ein neues Modul zu öffnen.

Nach dem Öffnen des VBA-Editor den folgenden Text einfügen VBA Code in dem geöffneten Modul.

 Option Explicit Public Function Driving_Distance(startlocation As String, destination As String, keyvalue As String) Dim First_Value As String, Second_Value As String, Last_Value As String, mitHTTP As Object, mitUrl As String First_Value = "//dev.virtualearth.net/REST/v1/Routes/DistanceMatrix?origins=" Second_Value = "&destinations=" Last_Value = "&travelMode=driving&o=xml&key="& keyvalue & "&distanceUnit=mi" Set mitHTTP = CreateObject("MSXML2.ServerXMLHTTP") mitUrl = First_Value & startlocation & Second_Value & destination & Last_Value mitHTTP.Open "GET", mitUrl, False mitHTTP.SetRequestHeader "User-Agent", "Mozilla/4.0 (kompatibel; MSIE 6.0; Windows NT 5.0)" mitHTTP.Send ("") Driving_Distance =Round(Round(WorksheetFunction.FilterXML(mitHTTP.ResponseText, "//TravelDistance")), 3), 0) End Function 

Code-Aufschlüsselung

• Hier habe ich eine benutzerdefinierte Funktion namens Fahrentfernung.
• Dann habe ich 3 Parameter verwendet: Startort , Zielort und Schlüsselwert. Dies sind die Position der beiden Adressen und die API Wert.
• Dann habe ich mehrere Variablen verwendet, z. B. Erster_Wert , Zweiter_Wert , Letzter_Wert , mitHTTP , & mitUrl. Diese Variablen werden zum Speichern verschiedener Werte verwendet.
• Dann wurden die Werte (gespeichert in mitUrl ) und verwendete mehrere Objektmethoden ( Öffnen Sie , SetRequestHeader , Senden Sie Auf diese Weise konnte ich die Fahrstrecke durch die API .

Diese VBA Code erzeugt eine benutzerdefinierte Funktion namens Fahrtdistanz .

Die Funktion Fahrtdistanz erfordert 3 Argumente insgesamt.

Hier ist die allgemeine Syntax der Fahrtdistanz Funktion.

Nun ist es an der Zeit, die benutzerdefinierte Funktion anzuwenden, und zwar so,

• Zelle auswählen E10 .
• Setzen Sie dann die folgende Formel ein:

• Drücken Sie nun EINGEBEN .

Formel Aufschlüsselung

• E5 ist die Start_Ort_Koordinate .
• E6 ist die Ende_Ort_Koordinate .
• C8 ist die API der Bing MAP .

Die Funktion berechnet die Entfernung zwischen zwei Adressen in Kilometern, siehe Zelle E10 Es wird die Nummer sehen, 2790 .

Die Fahrstrecke zwischen MacArthur Park, Camden NSW, Australien, und Jersey City, New Jersey, USA ist 2790 Meilen.

Lesen Sie mehr: Berechnung der Entfernung zwischen zwei Adressen in Excel (3 Möglichkeiten)

Praxisteil

Sie erhalten eine Excel-Tabelle wie die folgende Abbildung am Ende der Excel-Datei, in der Sie alle in diesem Artikel beschriebenen Methoden anwenden können.

Schlussfolgerung

Zusammenfassend habe ich 2 Möglichkeiten erörtert, um die Entfernung zwischen zwei Adressen in Excel zu berechnen. Und zögern Sie nicht, Ihre Fragen im Kommentarbereich unten zu stellen. Wir werden versuchen, alle relevanten Fragen so schnell wie möglich zu beantworten. Und besuchen Sie bitte unsere Website Exzellent um mehr zu erfahren.