Inversion de donnée dans une cellule [Résolu]

Necoho 8 Messages postés jeudi 18 mai 2017Date d'inscription 13 juin 2017 Dernière intervention - 12 juin 2017 à 10:58 - Dernière réponse : Necoho 8 Messages postés jeudi 18 mai 2017Date d'inscription 13 juin 2017 Dernière intervention
- 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)
Afficher la suite 

13 réponses

Répondre au sujet
f894009 12541 Messages postés dimanche 25 novembre 2007Date d'inscription 11 décembre 2017 Dernière intervention - 12 juin 2017 à 11:18
0
Utile
Bonjour,

Ce qui fait qu'il inverse le jour et le mois lors de l'export
Export ou import et comment?
Commenter la réponse de f894009
Necoho 8 Messages postés jeudi 18 mai 2017Date d'inscription 13 juin 2017 Dernière intervention - 12 juin 2017 à 13:17
0
Utile
1
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.
f894009 12541 Messages postés dimanche 25 novembre 2007Date d'inscription 11 décembre 2017 Dernière intervention - 12 juin 2017 à 13:47
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
Commenter la réponse de Necoho
Necoho 8 Messages postés jeudi 18 mai 2017Date d'inscription 13 juin 2017 Dernière intervention - 12 juin 2017 à 14:12
0
Utile
1
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)

http://www.cjoint.com/c/GFmmefBhXxQ
http://www.cjoint.com/c/GFmmg4aYdwQ
f894009 12541 Messages postés dimanche 25 novembre 2007Date d'inscription 11 décembre 2017 Dernière intervention - 12 juin 2017 à 14:26
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
Commenter la réponse de Necoho
Necoho 8 Messages postés jeudi 18 mai 2017Date d'inscription 13 juin 2017 Dernière intervention - 12 juin 2017 à 15:42
0
Utile
1
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 !
f894009 12541 Messages postés dimanche 25 novembre 2007Date d'inscription 11 décembre 2017 Dernière intervention - 12 juin 2017 à 17:03
Re,
replacez:
M = Left(MD, 3)

par:
M = Left(MD, 2)
Commenter la réponse de Necoho
Necoho 8 Messages postés jeudi 18 mai 2017Date d'inscription 13 juin 2017 Dernière intervention - 13 juin 2017 à 09:17
0
Utile
C'est parfait merci beaucoup !

Je clos le sujet !
Commenter la réponse de Necoho
Necoho 8 Messages postés jeudi 18 mai 2017Date d'inscription 13 juin 2017 Dernière intervention - Modifié par Necoho le 13/06/2017 à 11:29
0
Utile
4
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.
f894009 12541 Messages postés dimanche 25 novembre 2007Date d'inscription 11 décembre 2017 Dernière intervention - 13 juin 2017 à 12:44
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?
Necoho 8 Messages postés jeudi 18 mai 2017Date d'inscription 13 juin 2017 Dernière intervention - 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 !
f894009 12541 Messages postés dimanche 25 novembre 2007Date d'inscription 11 décembre 2017 Dernière intervention - 13 juin 2017 à 13:12
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.....
Necoho 8 Messages postés jeudi 18 mai 2017Date d'inscription 13 juin 2017 Dernière intervention > f894009 12541 Messages postés dimanche 25 novembre 2007Date d'inscription 11 décembre 2017 Dernière intervention - 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 !
Commenter la réponse de Necoho