XL 2016 Format de date inversée suite à une concaténation - VBA

foufa

XLDnaute Nouveau
Bonjour à tous,

J'ai un programme (fait pas une autre personne que moi :) ) qui me permet de concaténer plusieurs fichiers à la fois. Le problème que je rencontre est que certaines colonnes avec des dattes sont inversées une fois le programme exécute.

Je vous joint le code du programme en question car je ne sais pas ou le corriger pour ne plus avoir se problème.

merci par avance pour votre aide :)
 

Pièces jointes

  • Code VBA - CONCAT.txt
    6.3 KB · Affichages: 12

jmfmarques

XLDnaute Accro
Bonjour
Pourquoi joindre un fichier texte ? Tu as la possibilité de mettre ton code entre balises CODE, faites pour cela.
L'instruction format retourne une valeur de type string et non date.
Quel besoin de concaténer, pour finalement obtenir ce que te retourne la fonction NOW() ?
 

jmfmarques

XLDnaute Accro
Voici ce que je te conseille de faire (manière qui ne traite que l'affichage, sans "dénaturer" la valeur).
Exemple de code :
VB:
Range("A1") = Now()

Et formatage (format personnalisé) de la cellule A1 -->>
"Traitement commencé le : " jj/mm/aaaa " à "hh:mm
 

Discussions similaires

Statistiques des forums

Discussions
311 735
Messages
2 082 024
Membres
101 873
dernier inscrit
excellllll