PROGRAMME POUR AFICHER LA LONGITUDE ET LA LATITUDE, LA DATE ET L HORAIRE A PARTI

Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 - 28 oct. 2009 à 07:03
 elissa - 6 mars 2016 à 10:08
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/50757-programme-pour-aficher-la-longitude-et-la-latitude-la-date-et-l-horaire-a-partir-dun-fichier-texte

:'( est ce que je peut voir ton code pour faire mon projet ? :'(
bentiti31 Messages postés 10 Date d'inscription mardi 27 octobre 2009 Statut Membre Dernière intervention 30 octobre 2009
30 oct. 2009 à 11:19
j 'ai réussi a supprimer les lignes vides
j'ai ajouté 2 colonnes en ce qui concerne le nord/sud et l'est/ouest
j 'ai ajouté une boucle me permettant de changer la valeur reçu par le fichier texte pour les 2 colonnes ajoutés
et la je suis entrain d'ajouter la distance et la vitesse
je vous tiens au courant de l'évolution
akisvb Messages postés 20 Date d'inscription mardi 24 février 2009 Statut Membre Dernière intervention 8 novembre 2011
30 oct. 2009 à 10:20
Un zip et un fichier.txt = 100000 mots....!!! BENTITI31 AU BOULOT!!!!
jantosze Messages postés 72 Date d'inscription mercredi 29 mai 2013 Statut Membre Dernière intervention 15 mai 2009
29 oct. 2009 à 10:51
excuse moi, mais ni dans ton explication ni dans ton code, je ne vois la transformation de la distance de m en km.
Dans vitesse() tu appliques 'ActiveCell.FormulaR1C1 = "=RC[-1]/R2C11*3.6"',
et dans distance() tu appliques '# ActiveCell.FormulaR1C1 = _
# "=6366*ACOS(COS(RADIANS(RC[-3]))*COS(RADIANS(R[-1]C[-3]))*COS(RADIANS(RC[-5])-RADIANS(R[-1]C[-5]))+SIN(RADIANS(R[-1]C[-3]))*SIN(RADIANS(RC[-3])))*1000"'

Peut être supprimer '*1000' tu devrais obtenir une distance en km.
bentiti31 Messages postés 10 Date d'inscription mardi 27 octobre 2009 Statut Membre Dernière intervention 30 octobre 2009
28 oct. 2009 à 14:19
coodonnée(43,65027;1,37436):a
(43,65038;1,37473):b

distance=6366*ACOS(COS(RADIANS(1,37436))*COS(RADIANS(1,37473))*COS(RADIANS(43,65038)-RADIANS(43,65027)+SIN(RADIANS(1,37436))*SIN(RADIANS(1,37473)))*1000
=42,88715059 mètres
voila puis après la vitesse=distance/temps entre chaque(=10s)*3.6=15,44km/h
bentiti31 Messages postés 10 Date d'inscription mardi 27 octobre 2009 Statut Membre Dernière intervention 30 octobre 2009
28 oct. 2009 à 14:11
voici un exemple
prenons l exemple du fichier texte
coordonnée:(lon;lat):a
coordonnée: (lon;lat):b
donc distance=6366*ACOS(COS(RADIANS(latitudea))*COS(RADIANS(latitudeb))*COS(RADIANS(longitudeb)-RADIANS(longitudea)+SIN(RADIANS(latitude1a))*SIN(RADIANS(latitudeb)))*1000
voila tu aura la distance en metre
jantosze Messages postés 72 Date d'inscription mercredi 29 mai 2013 Statut Membre Dernière intervention 15 mai 2009
28 oct. 2009 à 14:05
Je viens de voir les 2 termes de longitude et latitude dans la formule.
jantosze Messages postés 72 Date d'inscription mercredi 29 mai 2013 Statut Membre Dernière intervention 15 mai 2009
28 oct. 2009 à 14:04
Selon ta formule, si je comprends bien, tu essais de calculer la distance entre 2 points de même longitude mais à des latitudes différentes? Sinon il manque quelque chose. Le terme "formule" représente la distance ainsi calculée entre les 2 points que tu utilises pour le calcule de la vitesse en fonction d'un temps commun.(remarque as tu pris en considération le changement d'unité entre "resultat" et "distance"?)
Ai je bien compris?
cs_Blodox Messages postés 134 Date d'inscription mardi 23 septembre 2003 Statut Membre Dernière intervention 24 octobre 2010
28 oct. 2009 à 13:31
Ouaip, mais c'eût été plus sympa de le mettre en zip avec les explis que tu donnes (un petit .txt / .rtf par ex.
bentiti31 Messages postés 10 Date d'inscription mardi 27 octobre 2009 Statut Membre Dernière intervention 30 octobre 2009
28 oct. 2009 à 12:47
l objectif c'est de creer un tableau en faisant toutes les conversions et de calculer en plus la distance avec la formule:=6366*ACOS(COS(RADIANS(latitude1))*COS(RADIANS(latitude2))*COS(RADIANS(longitude1)-RADIANS(longitude2)+SIN(RADIANS(latitude1))*SIN(RADIANS(latitude2)))*1000
resultat en metre

et la vitesse:= distance/temps*3.6
resultat en km/h
bentiti31 Messages postés 10 Date d'inscription mardi 27 octobre 2009 Statut Membre Dernière intervention 30 octobre 2009
28 oct. 2009 à 12:28
si vous voulez un exemple du tableau exel
je peux vous l' envoyé
bentiti31 Messages postés 10 Date d'inscription mardi 27 octobre 2009 Statut Membre Dernière intervention 30 octobre 2009
28 oct. 2009 à 12:27
le 1er + correspond au nord sinon - le sud
43.65016: longitude en base 100
le 2nd + correspond à l'est sinon - l'ouest
001.37417:latitude en base 100
20091019: date
133225: correspond a l heure
bentiti31 Messages postés 10 Date d'inscription mardi 27 octobre 2009 Statut Membre Dernière intervention 30 octobre 2009
28 oct. 2009 à 12:23
slt
j ai un fichier texte:
+43.65016,+001.37417,20091019,133225
+43.65016,+001.37417,20091019,133235
+43.65027,+001.37436,20091019,133245

A partir de ce resultat je copie ce resultat et je le colle sur la 2 eme ligne et 2 eme colonne
avec pour chaque colone un élement
-nord/sud; -longitude; -est/ouest; -latitude; -date; -horaire; -distance; -vitesse
jantosze Messages postés 72 Date d'inscription mercredi 29 mai 2013 Statut Membre Dernière intervention 15 mai 2009
28 oct. 2009 à 11:07
Slt,
Peux tu être plus clair sur le sur objectifs de ton programme, les données utilisées... peut être après le lecteur sera en mesure de répondre à ta question
cs_MPi Messages postés 3877 Date d'inscription mardi 19 mars 2002 Statut Membre Dernière intervention 17 août 2018 23
28 oct. 2009 à 10:07
Ce serait bien si tu joignais le fichier Excel ainsi qu'un fichier.txt
En fait, je ne comprends pas trop ce que tu lis et ce que tu veux avoir comme résultat...

Je pense qu'il y a de l'amélioration au niveau du code qui pourrait être apportée.
Et n'oublie pas qu'il y a un forum pour poser tes questions.

NB: Évite les "Select" lorsque c'est possible
cs_Blodox Messages postés 134 Date d'inscription mardi 23 septembre 2003 Statut Membre Dernière intervention 24 octobre 2010
28 oct. 2009 à 09:47
Oui, un exemple serait plus parlant aussi.
Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 74
28 oct. 2009 à 07:03
Merci de mettre une description un peu plus parlante.
Rejoignez-nous