Discussion :

[thovan]

Bonjour,

Une belle curiosité dont j'aimerais connaitre la cause et la solution :

J'ai une base de donnée Access contenant un champ Date.
Comme ce champ ne sert qu'à faire de l'affichage, je l'ai mis au format texte par facilité.

J'ai une fonction qui exporte certains champs de la table dont cette date.

J'extrais via une boucle sur chaque ligne du datagridview représentant la table complète et en sélectionnant simplement les 3 champs que je veux exporter :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
 
            Dim pos2 As Integer = 1
            For j = 0 To DataGridView1.RowCount - 1
                PGB_Export.Value = j + 1
                If DataGridView1.Rows(j).Cells(10).Value = False And DataGridView1.Rows(j).Cells(4).Value = "Complete" Then
                    pos2 = pos2 + 1
                    xlapp.Sheets(2).cells(pos2, 1).value = DataGridView1.Rows(j).Cells(1).Value 'Numéro de référence
                    xlapp.Sheets(2).cells(pos2, 2).value = DataGridView1.Rows(j).Cells(8).Value 'Date de facturation
                    xlapp.Sheets(2).cells(pos2, 3).value = DataGridView1.Rows(j).Cells(15).Value 'Niveau de facture
                End If
            Next

Quand j'ouvre Excel... je vois bien tous mes champs... mais....
Les dates qui ont un jour inférieur à 12 ont leur format inversé dans Excel.

Par exemple :
J'exporte 20/03/2019, Excel intègre 20/03/2019
J'exporte 02/03/2019, Excel intègre 03/02/2019

Je ne sais pas d'où ça vient.
J'ai mis un messagebox contenant la date au moment de l'export pour voir si c'était à ce niveau mais ce n'est pas là, il me répond la date dans le bon ordre.

J'ai pensé que c'était lié au paramètres régionaux (l'appli est développée et tourne sur une serveur 2012 R2) mais j'ai le même soucis sur mon windows 7 en français...

Donc, si quelqu'un sait comment régler ça je suis bien curieux de savoir

[clementmarcotte]

Bonjour,

Les dates dans Excel, ce n'est pas toujours une sinécure. En partant, dans Excel, une date c'est un nombre. Le nombre 1 signifiant 1er janvier 1900 (Windows) ou le 1er janvier 1904 (Mac). Quand Excel trouve une date en texte, il la convertit en nombre en se basant sur le format américain.

Tu devrais trouver des tuyaux par là

ou là

ou là

Mais moi, j'aime bien DateSerial()

[Invité]

bonjour,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

 xlapp.Sheets(2).cells(pos2, 2).value = DataGridView1.Rows(j).Cells(8).Value.tostring("yyyy-mm-dd") 'Date de facturation

[thovan]

bonjour,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

 xlapp.Sheets(2).cells(pos2, 2).value = DataGridView1.Rows(j).Cells(8).Value.tostring("yyyy-mm-dd") 'Date de facturation

marche pas

"Value type string cannot be converted to integer" :o

[Invité]

moi c'est comme ça que je fais!

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 Dim e As Exception
Try : xlapp.Sheets(2).cells(pos2, 2).value =Date.Parse(DataGridView1.Rows(j).Cells(8).Value).ToString("yyyy-MM-dd")  : Catch e : End Try

[thovan]

haaaa là ça marche
Par contre c'est drole... tu forces le format yyyy-mm-dd et Excel le prends comme dd/mm/yyyy....

Mais au moins c'est dans le bon ordre !

Tu sais me donner un petit mot d'explication pour ma culture personnelle ?

[Invité]

en fait Excel s’évertue à te simplifier la vie même si ça te fiche la grouille!

pour t'en convaincre saisie dans Excel 1/1/1 même si c'est bien ce que tu veux écrire!


yyyy-MM-dd c'est la date au format internationale.

c'est une incompatibilité culturel entre .net {Américain "mm/dd/YYYY"} et Excel {Culture Régional "dd/mm/yyyy"}

[thovan]

Ok...
ce qui est drôle c'est que les dates qui seraient aberrantes il les laisse comme ça....
Enfin, c'est comme partout... les dates, c'est toujours la merde :p

Merci pour ton aide en tout cas.