Discussion :

[stagiaireLDE]

Salutation,

Je poste ici suite à une erreur constaté lors d'une recopie dans la cellule d'une feuille Excel.


Après avoir récupéré et stocké des données String dans des variables, je me sert du bout de code suivant:

Code :

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

Sheets("feuil1").cells(LigneEtudieInt,1) = DateStr & " " & HMStr

chaque variable (lors de l'exécution de cette ligne) contient :

DateStr = "11/06/12"
HMStr=" 08:00:00
LigneEtudieInt= de 1 à 3000 (boucle for)

Une fois cette ligne exécutée la cellule indique :

06/11/12 08:00:00 au lieu de 11/06/12 08:00:00


et à partir du jour 13 tout redeviens normal ...

quelqu'un aurait une idée de l'origine de ce problème?

en vous remerciant.

[Mr.Mof]

Bonjour,

Regardes du coté des formats d'affichage dans tes cellules, le problème peut venir de la.

Cordialement.

[stagiaireLDE]

J'y ai pensé au début mais les cellules "bonne" et "mauvaise" sont toutes en format personalisé jj/mm/aaaa hh:mm

Mais j'ai eu de l'espoir un instant

Merci quand meme

[fring]

Bonjour,

En français on écrit "jour/mois/année" mais en anglais on écrit "mois/jour/année" et VBA étant anglophone, il confusionne...
Ca m'étonne quand même qu'il interprète 14 comme mois

Si tu écris le mois en toute lettre, VBA ne devrait plus faire la confusion entre le jour et le mois

Code :

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

DateStr = "14/june/12"

[stagiaireLDE]

Effectivement je viens de vérifier et comme tu le dis il me fais l'inversion par rapport au jour.

utiliser la methode que tu me propose serait une solution mais je dois conserver le meme format...

connaissez vous une methode pour afficher dans une cellule sans qu'aucune modification ne soit appliquée (que je puisse afficher 11/06/2012 sans qu'excel ne se pose la question de savoir si c'est une date un Single ou un String)

@fring il interprete bien 14 comme un jour ^^ le jour de départ était le 11 (j'ai édité le premier message pour corriger cela)


donc le problème viens bien de la mise en forme excel que j'aimerai court circuiter s'il y a une methode pour .

[gFZT82]

Bonjour,

As-tu essayé avec

Code :

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

Sheets("feuil1").Cells(LigneEtudieInt, 1) = DateValue(DateStr) + TimeValue(HMStr)

Cordialement.

[fring]

utiliser la methode que tu me propose serait une solution mais je dois conserver le meme format...

Ton format de cellule ne changera pas, il affichera 11/06/12