Calcul entre deux points GPS
Celie_4085
Messages postés
2
Date d'inscription
Statut
Membre
Dernière intervention
-
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
- Gps sans internet - Guide
- Nombre de jours entre deux dates excel - Guide
- Mettre des points sur une carte - Guide
- Calcul moyenne excel - Guide
1 réponse
yg_be
Messages postés
23541
Date d'inscription
Statut
Contributeur
Dernière intervention
Ambassadeur
1 584
bonjour,
ton calcul ne donne pas le résultat souhaité?
n'hésite pas à donner des exemples concrets.
ton calcul ne donne pas le résultat souhaité?
n'hésite pas à donner des exemples concrets.
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