Empêcher transformation dates format ENG depuis format FR
Niconz
Messages postés
313
Date d'inscription
Statut
Membre
Dernière intervention
-
Niconz Messages postés 313 Date d'inscription Statut Membre Dernière intervention -
Niconz Messages postés 313 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
Je fais face au problème suivant avec un formulaire sous VBA.
Dans le cadre de ce formulaire, plusieurs champs doivent être remplis, dont des champs format dates en Français (JJ/MM/AAAA).
Le remplissage du formulaire se fait parfaitement, et les dates rentrées sont bien enregistrées sous le format Francais.
Par contre, lorsque je reviens sur cette date, la date s'affiche désormais au format Anglais, et non plus Français.
L'objectif de mon fichier étant de mettre en place une base de données des contrats de l'entreprise.
Ainsi, si lorsque j'ajoute un nouveau contrat, avec date de début : 01/02/2017 (format Français), il me la transforme en 02/01/2017 (format Anglais), mon fichier n'a plus aucun intérêt, car il ne restitue pas correctement l'information qui a été enregistrée initialement.
Quelqu'un sait-il pourquoi Excel transforme le format des dates, et comment on peut empêcher cette transformation.
Si besoin, je peux vous envoyer le fichier dont il est question.
D'avance, merci beaucoup à tous pour votre aide,
Excellente journée,
Je fais face au problème suivant avec un formulaire sous VBA.
Dans le cadre de ce formulaire, plusieurs champs doivent être remplis, dont des champs format dates en Français (JJ/MM/AAAA).
Le remplissage du formulaire se fait parfaitement, et les dates rentrées sont bien enregistrées sous le format Francais.
Par contre, lorsque je reviens sur cette date, la date s'affiche désormais au format Anglais, et non plus Français.
L'objectif de mon fichier étant de mettre en place une base de données des contrats de l'entreprise.
Ainsi, si lorsque j'ajoute un nouveau contrat, avec date de début : 01/02/2017 (format Français), il me la transforme en 02/01/2017 (format Anglais), mon fichier n'a plus aucun intérêt, car il ne restitue pas correctement l'information qui a été enregistrée initialement.
Quelqu'un sait-il pourquoi Excel transforme le format des dates, et comment on peut empêcher cette transformation.
Si besoin, je peux vous envoyer le fichier dont il est question.
D'avance, merci beaucoup à tous pour votre aide,
Excellente journée,
A voir également:
- Vba format date français
- Lire le coran en français pdf - Télécharger - Histoire & Religion
- Format epub - Guide
- Format factory - Télécharger - Conversion & Codecs
- Hp usb disk storage format tool - Télécharger - Stockage
- Format apfs - Guide
127 réponses
Bonjour Francis,
Comment va ?
Dites-moi, sur la version ci-après, les fonctions Search, MOdification et reporting ne me génèrent pas les docuemnts qui sont pourtant bien créés dans l'onglet legal docs listing...
Pouvez-vous svp regarder ce qui cloche svp ?
http://www.cjoint.com/c/FLgouxhJZoM
D'avance, merci beaucoup.
Comment va ?
Dites-moi, sur la version ci-après, les fonctions Search, MOdification et reporting ne me génèrent pas les docuemnts qui sont pourtant bien créés dans l'onglet legal docs listing...
Pouvez-vous svp regarder ce qui cloche svp ?
http://www.cjoint.com/c/FLgouxhJZoM
D'avance, merci beaucoup.
Bonjour,
Tout a fait normal Thierry, test mondep faux puisque dans Data base Entreprise, c'est tout en MAJUSCULE
UF MODIFICATION:
Tout a fait normal Thierry, test mondep faux puisque dans Data base Entreprise, c'est tout en MAJUSCULE
UF MODIFICATION:
If (modif = 1 And mondep = "Purchasing") Or (modif = 0 And (mondep = "Purchasing" Or .Range("H" & n) = mondep))
Salut Francis,
Super, merci beaucoup.
Je pensais pas que les majuscules pouvaient poser problème…
Vous vous y connaissez sur les fonctionnalités Outlook liés à VBA…
Un autre contributeur CCM m'avait programmé le lancement d'alerte automatique par e-mail lorsque les dates de 1st et 2nd reminder sont échues, et bien que je n'ai pas touché à son code, les alertes ne marchent plus…
Normalement, en modifiant une de ces 2 dates dans l'onglet legal docs listing avec une date inférieur à celle d'auj bien sur, et lors de la prochaine ouverture du fichier par qq'un appartenant au département Purchasing, un pop-up s'affiche et un mail est envoyé.
Pouvez-vous regarder si jamais ?
Merci beaucoup.
Super, merci beaucoup.
Je pensais pas que les majuscules pouvaient poser problème…
Vous vous y connaissez sur les fonctionnalités Outlook liés à VBA…
Un autre contributeur CCM m'avait programmé le lancement d'alerte automatique par e-mail lorsque les dates de 1st et 2nd reminder sont échues, et bien que je n'ai pas touché à son code, les alertes ne marchent plus…
Normalement, en modifiant une de ces 2 dates dans l'onglet legal docs listing avec une date inférieur à celle d'auj bien sur, et lors de la prochaine ouverture du fichier par qq'un appartenant au département Purchasing, un pop-up s'affiche et un mail est envoyé.
Pouvez-vous regarder si jamais ?
Merci beaucoup.
ah, j'aurai supprimé par erreur des noms de formules...
Ok, j'essaye de les ré-intégrer, merci chef !
Ok, j'essaye de les ré-intégrer, merci chef !
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
Message : Run Time error 1004 :
Method "Range" of object "_Global" failed
Et quand j'arrive dans VBA, j'ai un message d'erreur "Can't execute code in break mode", et la ligne souligné en Jaune est celle ci-dessous dans Private Sub Term_Evts_TermDocs()
id_document = Range("Document_number").Rows(dates.Row) & "." & c 'n°document + indice colonne date rappel
Moi pas comprendre car l'ID document est bien présent !
Merci.
Method "Range" of object "_Global" failed
Et quand j'arrive dans VBA, j'ai un message d'erreur "Can't execute code in break mode", et la ligne souligné en Jaune est celle ci-dessous dans Private Sub Term_Evts_TermDocs()
id_document = Range("Document_number").Rows(dates.Row) & "." & c 'n°document + indice colonne date rappel
Moi pas comprendre car l'ID document est bien présent !
Merci.
Mon amnésie, ohoh : j'avoue que si j'écoute ma femme, je peux avoir une fish memory, pour reprendre ses termes... bref, mais là, il s'agit plus d'incompréhension que de mémoire, mon cher Francis !
Ah, c'est ca que ca veut dire ! Je comprends mieux le code maintenant.
Ok, à vouloir faire le tri, j'ai foutu la merde.
Je vais reprendre une version antérieure, et ne pas toucher aux nom de plage ou formule.
Je vous tiens au courant ! comme d'hab :)
Ah, c'est ca que ca veut dire ! Je comprends mieux le code maintenant.
Ok, à vouloir faire le tri, j'ai foutu la merde.
Je vais reprendre une version antérieure, et ne pas toucher aux nom de plage ou formule.
Je vous tiens au courant ! comme d'hab :)
Bonjour Francis,
Besoin d'un petit conseil, pour changer :)
Avant présentation de mon fichier à mes collègues, j'aimerais supprimer tous les résultats de mes tests précédents (cad, supprimer toutes les lignes de l'onglet legal docs listing).
J'ai essayé, et j'en ai profité pour mettre à jour quelques listes déroulantes (supplier name par ex : en supprimant les noms de fournisseurs débiles, du type ABCD, etc...), en modifiant en conséquence les noms de plage, et sans en supprimer.
Après avoir fait ca, et en n'ayant absolument pas touché au code, et après avoir rentré qq docs pour essai, ca bug... pour changer.
Ca bug surtout pour la modification d'un NDA, qui ne reprend pas toutes les informations comme souhaité, en affiche d'autres pas voulues, etc... alors que dans la version précédente du fichier (qui elle contient tout mon historique de tests) tout marche très bien.

https://www.cjoint.com/c/FLimBcClEZH
Qu'ai-je (encore) fait de mauvais ?
Besoin d'un petit conseil, pour changer :)
Avant présentation de mon fichier à mes collègues, j'aimerais supprimer tous les résultats de mes tests précédents (cad, supprimer toutes les lignes de l'onglet legal docs listing).
J'ai essayé, et j'en ai profité pour mettre à jour quelques listes déroulantes (supplier name par ex : en supprimant les noms de fournisseurs débiles, du type ABCD, etc...), en modifiant en conséquence les noms de plage, et sans en supprimer.
Après avoir fait ca, et en n'ayant absolument pas touché au code, et après avoir rentré qq docs pour essai, ca bug... pour changer.
Ca bug surtout pour la modification d'un NDA, qui ne reprend pas toutes les informations comme souhaité, en affiche d'autres pas voulues, etc... alors que dans la version précédente du fichier (qui elle contient tout mon historique de tests) tout marche très bien.

https://www.cjoint.com/c/FLimBcClEZH
Qu'ai-je (encore) fait de mauvais ?
Re,
Cellule vide : oui, car c'est un NDA, donc ce champ n'est pas à remplir.
et vous ne pouvez pas ecrire la combobox SHIP_COND: vous me le traduisez en francais svp ?
Cellule vide : oui, car c'est un NDA, donc ce champ n'est pas à remplir.
et vous ne pouvez pas ecrire la combobox SHIP_COND: vous me le traduisez en francais svp ?
Oulala doucement moussaillon !
J'avais bien précisé que j'avais mis à jour les listes déroulantes...
Donc si je comprends bien, par rapport à mon pb précédent, il faut simplement que je pense à laisser une cellule vide dans mes listes déroulantes pour les champs qui ne sont pas à remplir dans le cadre d'un NDA.
Et donc pas besoin de toucher au code.
Est-ce bien cela ?
Encore merci Francis !
J'avais bien précisé que j'avais mis à jour les listes déroulantes...
Donc si je comprends bien, par rapport à mon pb précédent, il faut simplement que je pense à laisser une cellule vide dans mes listes déroulantes pour les champs qui ne sont pas à remplir dans le cadre d'un NDA.
Et donc pas besoin de toucher au code.
Est-ce bien cela ?
Encore merci Francis !
Bonjour Capitaine,
Tout bon, merci.
Je comprends toujours pas toute la logique du code, mais bon, je vivrai avec.
Pour bien finir la semaine, voici ma liste de questions du jour : :)
Onglet "Legal docs listing" :
1. Puis-je changer le titre des colonnes, ex : Type of legal documents par Type of doc, sans risque de désastre buggien ?
2. Colonne A, N, O, W, X & Y : (là ou il y a des dates) : puis-je mettre en format Date court, sans risque de désastre buggien ?
3. Colonne J, Q & U (là ou il y a des chiffres) : puis-je mettre en format nombre, sans risque de désastre buggien ?
Onglet "Reporting" :
1. Cellule N1 et O1 comportent des commentaires que j'ai beau effacé, revienne toujours. Comment les enlever une bonne fois pour toutes ?
C'est tout... pour le moment :)
Très bonne journée,
Tout bon, merci.
Je comprends toujours pas toute la logique du code, mais bon, je vivrai avec.
Pour bien finir la semaine, voici ma liste de questions du jour : :)
Onglet "Legal docs listing" :
1. Puis-je changer le titre des colonnes, ex : Type of legal documents par Type of doc, sans risque de désastre buggien ?
2. Colonne A, N, O, W, X & Y : (là ou il y a des dates) : puis-je mettre en format Date court, sans risque de désastre buggien ?
3. Colonne J, Q & U (là ou il y a des chiffres) : puis-je mettre en format nombre, sans risque de désastre buggien ?
Onglet "Reporting" :
1. Cellule N1 et O1 comportent des commentaires que j'ai beau effacé, revienne toujours. Comment les enlever une bonne fois pour toutes ?
C'est tout... pour le moment :)
Très bonne journée,
Bonjour Capitaine chef !
Ca va ou bien !
Question du jour : pourquoi ai-je le message d'erreur suivant lorsque je cherche à ajouter un NDA ?
blabla.... the format of the date is not correct
Ca n'apparaît que lorsque je cherche à ajouter un NDA, pas pour les autres.
Merci chef :)
Ca va ou bien !
Question du jour : pourquoi ai-je le message d'erreur suivant lorsque je cherche à ajouter un NDA ?
blabla.... the format of the date is not correct
Ca n'apparaît que lorsque je cherche à ajouter un NDA, pas pour les autres.
Merci chef :)
Bonjour,
C'est tout a fait normal Thierry, dans
a la fin il y a une raz des controls et comme il y a du code befordate pour pas mal de controls, ben ca merde pour les NDA et devrait aussi pour Contract
ligne de code en cause
Dans les essais que je fais, il y a trois erreurs de suite pour @mail et dates
C'est tout a fait normal Thierry, dans
Private Sub SAVE_Click()
a la fin il y a une raz des controls et comme il y a du code befordate pour pas mal de controls, ben ca merde pour les NDA et devrait aussi pour Contract
ligne de code en cause
If TYPE_DOC <> "Amendment" And ctrl.Name <> "DESCRIPTION" Then ctrl.VALUE = "" End If
Dans les essais que je fais, il y a trois erreurs de suite pour @mail et dates
Re,
Au plus simple, pas de raz en fin d'enregistrement vu qu'il y a un unload de la forme
https://www.cjoint.com/c/FLmlajrKXWf
Au plus simple, pas de raz en fin d'enregistrement vu qu'il y a un unload de la forme
https://www.cjoint.com/c/FLmlajrKXWf
Re, au post n° 306.
En fait, il s'agit de changer le Caption des labels.
donc pas de conséquence sur les macros je suppose.
En fait, il s'agit de changer le Caption des labels.
donc pas de conséquence sur les macros je suppose.
Hey Sheldon,
Réponse toujours aussi compréhensible Jean Mi !!!
C'était du sarcasme, si jamais !
Oui, pas : : A l'image de votre logique, ...illogique.
Test de culture générale : A qui fais-je référence par Sheldon ?
Réponse toujours aussi compréhensible Jean Mi !!!
C'était du sarcasme, si jamais !
Oui, pas : : A l'image de votre logique, ...illogique.
Test de culture générale : A qui fais-je référence par Sheldon ?
Re,
Vous parlez de cette personne:
https://www.topito.com/top-meilleures-repliques-sheldon-cooper-big-bang-theory-genie
Vous parlez de cette personne:
https://www.topito.com/top-meilleures-repliques-sheldon-cooper-big-bang-theory-genie
Salut Sheldon,
Je trouve que ce prénom vous va à ravir, même sans vous connaître… :)
Bref, FYI, et même si cela vous fait une belle jambe, j'ai présenté l'outil à tous mes collègues hier, en vue d'un déploiement dans toute l'entreprise, et le feedback fut très positif.
Je n'aurai pas pu espérer mieux.
Le fichier ne sera pas effectif avant Février - Mars, le temps de valider l'inventaire de nos contrats existants, et charger l'historique dans l'outil, mais d'ici-là, je ne devrai pas trop vous appeler à la rescousse.
Je dois bien avouer que je n'en serai pas là sans votre aide, et pour cela, je vous en suis très reconnaissant.
J'ai eu l'occasion de vous remercier à plusieurs reprises, mais pas à sa juste valeur.
Ainsi, j'aimerais beaucoup pouvoir vous adresser un petit cadeau de remerciement.
Ce n'est pour moi, qu'une juste rétribution pour tout ce que vous avez fait, même si je suis conscient que vous faîtes ca de manière bénévole, mais je doute que vous ayez autant donné de votre temps à d'autres utilisateurs de CCM… (nous en sommes quand même à notre 320ème post d'échanges…)
Je vous laisse donc me dire ce qui vous ferait plaisir, et comment on peut s'arranger.
Et merci de m'épargner une réponse bateau du type "Merci suffira", ca m'énervera plus qu'autre chose !
Si jamais vous en doutez, je suis du genre têtu, et je ne compte pas lâcher si facilement.
D'ailleurs, un énorme MERCI pour tout ce que vous avez fait, et ferez très certainement dans les prochaines semaines :) !
J'attends votre réponse avec impatience.
Merci Sheldon.
Je trouve que ce prénom vous va à ravir, même sans vous connaître… :)
Bref, FYI, et même si cela vous fait une belle jambe, j'ai présenté l'outil à tous mes collègues hier, en vue d'un déploiement dans toute l'entreprise, et le feedback fut très positif.
Je n'aurai pas pu espérer mieux.
Le fichier ne sera pas effectif avant Février - Mars, le temps de valider l'inventaire de nos contrats existants, et charger l'historique dans l'outil, mais d'ici-là, je ne devrai pas trop vous appeler à la rescousse.
Je dois bien avouer que je n'en serai pas là sans votre aide, et pour cela, je vous en suis très reconnaissant.
J'ai eu l'occasion de vous remercier à plusieurs reprises, mais pas à sa juste valeur.
Ainsi, j'aimerais beaucoup pouvoir vous adresser un petit cadeau de remerciement.
Ce n'est pour moi, qu'une juste rétribution pour tout ce que vous avez fait, même si je suis conscient que vous faîtes ca de manière bénévole, mais je doute que vous ayez autant donné de votre temps à d'autres utilisateurs de CCM… (nous en sommes quand même à notre 320ème post d'échanges…)
Je vous laisse donc me dire ce qui vous ferait plaisir, et comment on peut s'arranger.
Et merci de m'épargner une réponse bateau du type "Merci suffira", ca m'énervera plus qu'autre chose !
Si jamais vous en doutez, je suis du genre têtu, et je ne compte pas lâcher si facilement.
D'ailleurs, un énorme MERCI pour tout ce que vous avez fait, et ferez très certainement dans les prochaines semaines :) !
J'attends votre réponse avec impatience.
Merci Sheldon.
Re,
mais quel phénomème vous êtes ?
Et si je vous le demande gentiment ?
Allez, vous faîtes pas prier, c'est quand même pas tous les jours qu'on doit vous proposer un petit cadeau à l'approche des fêtes.
Et ce me fera vraiment plaisir en plus.
Réfléchissez 2 fois avant de commencer à taper votre réponse !
mais quel phénomème vous êtes ?
Et si je vous le demande gentiment ?
Allez, vous faîtes pas prier, c'est quand même pas tous les jours qu'on doit vous proposer un petit cadeau à l'approche des fêtes.
Et ce me fera vraiment plaisir en plus.
Réfléchissez 2 fois avant de commencer à taper votre réponse !
Bonjour Sheldon,
Ne vous ai-je pas dit que j'étais du genre tétû ?
J'attends toujours votre réponse...
Ne vous ai-je pas dit que j'étais du genre tétû ?
J'attends toujours votre réponse...
Bonjour Sheldon,
Apparemment, vous êtes aussi tetu que moi !
On est mal barré, enfin surtout moi comme d'hab.
Si la méthode sarcastique, gentille et relou ne marche pas, pouvez-vous me dire laquelle marchera ? on gagnera du temps tous les 2...
Merci beaucoup,
Apparemment, vous êtes aussi tetu que moi !
On est mal barré, enfin surtout moi comme d'hab.
Si la méthode sarcastique, gentille et relou ne marche pas, pouvez-vous me dire laquelle marchera ? on gagnera du temps tous les 2...
Merci beaucoup,
Ahhh, enfin une réponse. MERCI !
Très belle attention sheldon, votre qualité d'altruisme ne fait que ressortir davantage...
Oui, je souhaite vraiment vous remercier, d'une facon ou d'une autre...
J'aurai préféré vous offrir quelque chose à vous, car c'est VOUS qui avez fait le job, mais le choix vous appartient.
OK, je m'y engage, je ferai un cadeau à quelqu'un à qui je n'ai pas encore pensé... restes plus qu'à trouver cette personne.
D'avance, merci pour lui ou elle !
A bientôt j'espère, et encore mille mercis pour tout :)
Joyeux Noël et très belles fêtes de fin d'année.
Très belle attention sheldon, votre qualité d'altruisme ne fait que ressortir davantage...
Oui, je souhaite vraiment vous remercier, d'une facon ou d'une autre...
J'aurai préféré vous offrir quelque chose à vous, car c'est VOUS qui avez fait le job, mais le choix vous appartient.
OK, je m'y engage, je ferai un cadeau à quelqu'un à qui je n'ai pas encore pensé... restes plus qu'à trouver cette personne.
D'avance, merci pour lui ou elle !
A bientôt j'espère, et encore mille mercis pour tout :)
Joyeux Noël et très belles fêtes de fin d'année.
Bonjour Francois,
Lesquels?
> Pour tous ceux qui ont la réponse "Yes" dans Tacit Renewal.
Voir l'exemple avec le fichier ci-joint :
http://www.cjoint.com/c/GDshHL61fFF
N.B : afin de déployer les changements dans mon fichier "live", j'aurai besoin à terme que vous m'indiquiez les endroits ou le code a été modifié, et comment… :)
Merci.
Lesquels?
> Pour tous ceux qui ont la réponse "Yes" dans Tacit Renewal.
Voir l'exemple avec le fichier ci-joint :
http://www.cjoint.com/c/GDshHL61fFF
N.B : afin de déployer les changements dans mon fichier "live", j'aurai besoin à terme que vous m'indiquiez les endroits ou le code a été modifié, et comment… :)
Merci.
Je regarde la chose demain matin
À+