Bonjour tout le monde;

je récupère des donnée d'une table (sur un serveur distant) sachant que j'ai des champs de type smalldatetime, et lorsque j'exporte le contenu de mon ADOQuery vers Excel je m'aperçois que j'ai des dates qui sont écrites sous la forme : JJ/MM/AAAA HH:MM:SS (exemple : "17/04/2008 21:59:00")et d'autres dates sont écrites sous la forme : MM/JJ/AAAA HH:MM (comme si en anglais) (exemple : "06/08/2008 04:02") sachant aussi que sur mon DBGRID, toutes les dates sont écrites de la même manière (JJ/MM/AAAA HH:MM:SS) et c'est la forme que je veux avoir dans toutes mes cellules Excel.

Y a t il un problème de conversion la dessus?

Merci pour votre aide!

Bonjour othland,
smalldatetime connais pas ??

non, il doit y avoir une ch'tit anomalie soit dans le stockage des données de la table (jette un oeil) ou dans le code de l'export vers excel.

cantador

Bonjour,
en fait, j'ai exécuté en mode pas à pas et lorsque j'ai vérifier le contenu de mon ADODataSet1.FieldByName('date').AsString je l'ai trouvé eous le format : JJ/MM/AAAA HH:MM:SS, mais lorsque je l'envoie cers l'excel (vXLWorkbook4.WorkSheets['Feuil1'].Range['E'+inttostr(v)] :=ADODataSet1.FieldByName('date').asstring;)
ben ça me modifie le format en MM/JJ/AAAA HH:MM

mais le problème c'est que des fois ça me le fais et des fois ça passe normalement!!

Avez vous une idée la dessus?
Merci pour votre aide

bizarre ce truc..
essaie quand même çà :
DateTimeToStr(ADODataSet1.FieldByName('MonChampDate').AsDateTime);
evite aussi de nommer des champs 'date' car c'est un mot réservé..

cantador

Bonjour,
la même chose Cantador,
j'ai modifié mon code comme suit :
///////
ch := DateTimeToStr(ADODataSet1.FieldByName('Date_H_Debut').AsDateTime);
vXLWorkbook4.WorkSheets['Feuil1'].Range['D'+inttostr(v)]:= ch;
///////
et lorsque j'execute en mode pas à pas je trouve que la variable ch contient la chaine '08/06/2008 15:34:00' et sur la cellule Excel ça m'affiche '06/08/2008 15:34' .... je ne comprend pas pourquoi??

Merci pour votre aide!

Alors il faut passer une écriture avant qui impose à EXCEL de traiter les dates selon un format.
je cherche..

jette aussi un oeil dans ton panneau de configuration (options régionales)

cantador

C'est excel qui se mélange les crayons..
essaie çà :
Excel.Selection.NumberFormat := 'jj/mm/aaaa hh:mm:ss';

cantador

je ne comprend plus rien maintenant!
même après avoir imposer le format d'affichage, ben il m'affiche toujours '06/09/2008 15:35:00' au lieu de '09/06/2008 15:35:00' ... vas y comprendre!!

désolé othland, mais là je rends mon tablier..
il y a quelques exemple sur le site dont un pas mal fait avec une unité
DriveOleExcel.pas mais je ne retrouve pas son auteur..

ah si tu peux aussi utiliser un compo (il y a en des free) pour faire un export direct..

si tu trouves penses à nous !

cantador

salut,

j'ai pas tellement d'xp avec excel, mais j'ai quelques questions/idées pour toi:

1)
est-ce que tu modifies le "FormatSettings" quelques part (ailleurs) dans ton code? as-tu des threads?

2)
as-tu essayer de passer par une var local avant de l'envoyer vers excel?

3)
as-tu essayer de toujours envoyer le même string vers excel (cad forcer la valeur avec une const). juste histoire de voir si ça vient de la cellule, si c'est constant, ...

4)
ton windows, c'est un windows anglais? les option regional sont toujours bonne après que ton erreur se soit produite? (tu as peut-être un soft qui te change tes options regional)

bonne chance,

Loda

---

Se poser les bonnes questions est le premier pas pour trouver les bonnes réponses.