Inversion de donnée dans une cellule

Résolu/Fermé
Necoho Messages postés 8 Date d'inscription jeudi 18 mai 2017 Statut Membre Dernière intervention 13 juin 2017 - 12 juin 2017 à 10:58
Necoho Messages postés 8 Date d'inscription jeudi 18 mai 2017 Statut Membre Dernière intervention 13 juin 2017 - 13 juin 2017 à 13:34
Bonjour à toutes et à tous.

Je vous explique ma situation, je suis actuellement en stage et mon objectif est d'automatiser des saisies issues d'instrument de mesure dans un laboratoire en utilisant VBA.

Je ne m'en suis pas trop mal sortie jusque la en trouvant mon bonheur à travers les forums mais la je commence à ne pas trouver l'info.

Alors voici mon problem.

Le fichier issu de l'instrument a un format date américain, et excel, evidemment, un format date européen ... Ce qui fait qu'il inverse le jour et le mois lors de l'export (problem recurrent depuis environ la creation d'excel d'après ma recherche sur les forums).

Alors du coup j'aurais besoin d'un coup de main pour remettre la date dans le bon ordre en utilisant une macro (le changement de format ne fonctionne pas)

Je suis clairement pas un expert dans le domaine et je galère à trouver une solution fonctionnelle.

(Je n'arrive pas à inserer les fichiers que j'utilise)

6 réponses

f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 701
12 juin 2017 à 11:18
Bonjour,

Ce qui fait qu'il inverse le jour et le mois lors de l'export
Export ou import et comment?
0
Necoho Messages postés 8 Date d'inscription jeudi 18 mai 2017 Statut Membre Dernière intervention 13 juin 2017
12 juin 2017 à 13:17
L'instrument est sous le format jj/mm/yyyy et a possibilité d'envoyé les données récoltées sous forme de tableau excel (dans "fichier" : "send data to MS excel"), lors de la convertion, il est toujours sous format jj/mm/yyyy mais il inverse les données jj/mm
en gros ==> instrument : 09/06/2017
Fichier excel : 06/09/2017
tout deux sous format jj/mm/yyyy je me retrouve donc avec le 6 septembre au lieu du 9 juin.
0
f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 701
Modifié le 12 juin 2017 à 13:49
Re,

tout deux sous format jj/mm/yyyy
Non, si j'ai bien compris. L'intrument envoi jj/mm/yyyy et Excel "interprete" mm/jj/yyyy
Probleme: a quel moment voulez-vous reformater les dates, en temps reel surement pas, donc ......?

Possible de voir ou avoir un fichier cree ou pas ?

suite:
Toutes les dates de tous les mois sont inversees ou seulement les jours de 1 a 12
0
Necoho Messages postés 8 Date d'inscription jeudi 18 mai 2017 Statut Membre Dernière intervention 13 juin 2017
12 juin 2017 à 14:12
Re,

Il semblerait que ça soit quelque chose comme ça.
Voici les 2 documents que j'utilise, le fichier nommé "dco" est le fichier extrait de l'instrument via "fichier => send data to MS excel" et le fichier "Export DCO" est le fichier où je voudrais retrouver la date correcte.

Il contient notamment une macro de conversion dans laquelle je voudrais insérer la macro pour remettre la date dans l'ordre.

Il semblerait que seule les dates avec les jours 1 à 12 soient concernées (dû au problem récurent de conversion entre le format américain et européen)

https://www.cjoint.com/c/GFmmefBhXxQ
https://www.cjoint.com/c/GFmmg4aYdwQ
0
f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 701
Modifié le 12 juin 2017 à 15:08
Re,

Il semblerait que seule les dates avec les jours 1 à 12 soient concernées
Sure!

Ok, je regarde la chose
A+

Suite:

Fichier code modifie, conversion date pour le fichier a dispo faite:
https://mon-partage.fr/f/JiXxIE5R/
Attention a ne pas modifer manuellement la date avent conversion
0
Necoho Messages postés 8 Date d'inscription jeudi 18 mai 2017 Statut Membre Dernière intervention 13 juin 2017
12 juin 2017 à 15:42
C'est parfait à un detail près !

09/06//2017 19:43:57

J'ai un double "/" entre le mois et l'année, est-ce normal ? Comment puis-je le supprimer ?

Merci beaucoup pour votre aide, je n'aurais jamais trouvé ça seul !
0
f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 701
Modifié le 12 juin 2017 à 17:04
Re,
replacez:
M = Left(MD, 3)

par:
M = Left(MD, 2)
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
Necoho Messages postés 8 Date d'inscription jeudi 18 mai 2017 Statut Membre Dernière intervention 13 juin 2017
13 juin 2017 à 09:17
C'est parfait merci beaucoup !

Je clos le sujet !
0
Necoho Messages postés 8 Date d'inscription jeudi 18 mai 2017 Statut Membre Dernière intervention 13 juin 2017
Modifié le 13 juin 2017 à 11:29
De retour !

Un autre soucis fait surface !

En faisant la modification il ne fait plus le changement entre 06 et 09.

J'ai essayer de trouver la solution par moi meme, mais aucun des changement que j'ai pu faire n'a aboutis à quoi que ce sois.
0
f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 701
Modifié le 13 juin 2017 à 12:55
Bonjour,

J'ai eu le meme soucis hier,remplacez:
Plage(n, 1) = J & M & Right(Plage(n, 1), 14)

par
Plage(n, 1) = CDate(J & M & Right(CStr(Plage(n, 1)), 14))


Par contre votre code pour les copies de colonne seme la pagaille chez moi. Vous utilisez Excel2003 et les fichiers sont ouverts avec deux excel separes?
0
Necoho Messages postés 8 Date d'inscription jeudi 18 mai 2017 Statut Membre Dernière intervention 13 juin 2017
13 juin 2017 à 12:59
Re,

Effectivement, l'Excel de mon entreprise est 2003.

J'utilise en effet 2 feuilles, une issue de l'instrument et l'autre comportant la macro.

Votre solution fonctionne à merveille !

Merci beaucoup pour votre aide !
0
f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 701
Modifié le 13 juin 2017 à 13:13
Re,

J'utilise en effet 2 feuilles
Deux classeurs, que vous ouvrez manuellement. Export_DCO, c'est normal,mais l'autre ca pourrait se faire par VBA ou plus "sophistique" VBA sans l'ouvrir
Mais c'est vous qui voyez.....
0
Necoho Messages postés 8 Date d'inscription jeudi 18 mai 2017 Statut Membre Dernière intervention 13 juin 2017 > f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024
13 juin 2017 à 13:34
Elle s'ouvre d'elle meme lorsque je l'exporte de l'instrument, je pense éviter son ouverture en évitant de l'enregistrer pour la renommer. Ca sera effectivement un gain de temps.

Merci du conseil !
0