Calcul entre deux points GPS
Celie_4085
Messages postés
3
Statut
Membre
-
Utilisateur anonyme -
Utilisateur anonyme -
Bonjour,
Je souhaite calculer la distance entre deux points GPS (latitude et longitude) sous access. Quelle formule serait la plus adaptée? Merci pour votre aide et vos réponses.
voilà ce que j'ai pu démarrer..
Public Function Arc(Valeur As Double) As Double
Arc = Atn(-Valeur / Sqr(-Valeur * Valeur + 1)) + 2 * Atn(1)
End Function
Function calcul(LATA, LONGA, LATB, LONGB) As Integer
calcul = Arc(Sin(LATA) * Sin(LATB) + (Cos(LATA) * Cos(LATB) * Cos(LONGA - (LONGB + 1E-23)))) * 6371
End Function
Je souhaite calculer la distance entre deux points GPS (latitude et longitude) sous access. Quelle formule serait la plus adaptée? Merci pour votre aide et vos réponses.
voilà ce que j'ai pu démarrer..
Public Function Arc(Valeur As Double) As Double
Arc = Atn(-Valeur / Sqr(-Valeur * Valeur + 1)) + 2 * Atn(1)
End Function
Function calcul(LATA, LONGA, LATB, LONGB) As Integer
calcul = Arc(Sin(LATA) * Sin(LATB) + (Cos(LATA) * Cos(LATB) * Cos(LONGA - (LONGB + 1E-23)))) * 6371
End Function
A voir également:
- Calcul entre deux points GPS
- Points gps - Guide
- Nombre de jours entre deux dates excel - Guide
- Gps sans internet - Guide
- Mettre des points sur une carte - Guide
- Calcul moyenne excel - Guide
Long A = Long point A; Long B = Long point B
Lat A = lat point A = Lat point A; Lat B = Lat point B
(+/-)111,319 km x Racine^2((Lat A - Lat B)^2) + (Long A - Long B)^2)
Avec Long B < Long A et Lat B < Lat B