Hallo zusammen,
ich suche nach einer einfachen Möglichkeiten eine größeren Anzahl an Postleitzahlen zu analysieren hinsichtlich Entfernung und wenn möglich Fahrtzeit zu einer bestimmten Adresse?
Kann mir hier jemand helfen?
Vielen Dank schon mal!!
A Adresse xy Entfernung
81111 =xx
82222
83333
......
Hallo
im Archiv habe ich eine Datei, die für jede PLZ die GSP-Koordinaten enthält. Zusammen mit Pythagoras sollte man daraus näherungsweise die Entfernung zwischen 2 PLZ berechnen können.
Dafür sind aber mehr als VBA-Grundkenntnisse nötig.
mfg
Moin!
Nun, für den Pythagoras braucht man kein VBA.
| Arbeitsblatt mit dem Namen 'Tabelle2' |
| A | B | C | D | E | F | G | H | I |
| 1 | PLZ_Start | Ort_Start | Lon_Start | Lat_Start | PLZ_Ziel | Ort_Ziel | Lon_Ziel | Lat_Ziel | Luftlinie |
| 2 | D-45881 | Gelsenkirchen | 51,5285 | 7,07863 | D-01279 | Dresden | 51,0263 | 13,8294 | 406,854009 |
| Zelle | Formel |
| B2 | =SVERWEIS(A2;Tabelle1!A:B;2;0) |
| C2 | =SVERWEIS($A2;Tabelle1!$A:$D;SPALTE(C7);0) |
| D2 | =SVERWEIS($A2;Tabelle1!$A:$D;SPALTE(D7);0) |
| F2 | =SVERWEIS(E2;Tabelle1!A:B;2;0) |
| G2 | =SVERWEIS($E2;Tabelle1!$A:$D;SPALTE(C7);0) |
| H2 | =SVERWEIS($E2;Tabelle1!$A:$D;SPALTE(D7);0) |
| I2 | =ARCCOS((SIN(D2*PI()/180)*SIN(H2*PI()/180)+
COS(D2*PI()/180)*COS(H2*PI()/180)*
COS(G2*PI()/180-C2*PI()/180)))*3443,8985 |
Ich hab die Datei mal hochgeladen.
Sie ist deshalb so groß geworden, weil sie eine Liste aller deutschen PLZ mit den entsprechenden LAT und LON enthält.
Gruß Ralf
Das hilft mir erstmal sehr...vielen Dank euch!!