Sélection date avec combobox 12/01/2015 mais dans cellule 1 déc.
Fermé
Linebaker
Messages postés
51
Date d'inscription
vendredi 23 novembre 2012
Statut
Membre
Dernière intervention
21 avril 2023
-
10 janv. 2015 à 17:16
Linebaker Messages postés 51 Date d'inscription vendredi 23 novembre 2012 Statut Membre Dernière intervention 21 avril 2023 - 14 janv. 2015 à 18:09
Linebaker Messages postés 51 Date d'inscription vendredi 23 novembre 2012 Statut Membre Dernière intervention 21 avril 2023 - 14 janv. 2015 à 18:09
A voir également:
- Sélection date avec combobox 12/01/2015 mais dans cellule 1 déc.
- Windows 12 - Accueil - Windows
- Aller à la ligne dans une cellule excel - Guide
- Excel cellule couleur si condition texte - Guide
- Verrouiller cellule excel - Guide
8 réponses
NHenry
Messages postés
15163
Date d'inscription
vendredi 14 mars 2003
Statut
Modérateur
Dernière intervention
1 novembre 2024
345
10 janv. 2015 à 17:26
10 janv. 2015 à 17:26
12/01/2015
jj/mm/aaaa (france)
ou
mm/jj/aaaa (anglophone)
?
jj/mm/aaaa (france)
ou
mm/jj/aaaa (anglophone)
?
Linebaker
Messages postés
51
Date d'inscription
vendredi 23 novembre 2012
Statut
Membre
Dernière intervention
21 avril 2023
1
10 janv. 2015 à 19:16
10 janv. 2015 à 19:16
Bonjour, NHenry,
Je sélectionne 12/01/2015 (jj/mm/aaaa) et je veux aaaa/mm/jj pour qu'il soit affiché 12 janv. 2015.
Voici ma ligne de code pour alimenter le combobox :
If Controls("Combobox" & I).ListIndex = -1 Then Controls("Combobox" & I).AddItem cell
et la ligne de transfert : ActiveCell.Offset(0, 1) = CDate(ComboBox16)
Merci de ton aide
Je sélectionne 12/01/2015 (jj/mm/aaaa) et je veux aaaa/mm/jj pour qu'il soit affiché 12 janv. 2015.
Voici ma ligne de code pour alimenter le combobox :
If Controls("Combobox" & I).ListIndex = -1 Then Controls("Combobox" & I).AddItem cell
et la ligne de transfert : ActiveCell.Offset(0, 1) = CDate(ComboBox16)
Merci de ton aide
NHenry
Messages postés
15163
Date d'inscription
vendredi 14 mars 2003
Statut
Modérateur
Dernière intervention
1 novembre 2024
345
10 janv. 2015 à 22:43
10 janv. 2015 à 22:43
As-tu regardé la fonction Format$ ?
format$(CDate(...),"...")
format$(CDate(...),"...")
Linebaker
Messages postés
51
Date d'inscription
vendredi 23 novembre 2012
Statut
Membre
Dernière intervention
21 avril 2023
1
11 janv. 2015 à 12:39
11 janv. 2015 à 12:39
Bonjour NHenry,
J'ai changé la ligne :
ActiveCell.Offset(0, 1) = Format$(CDate(ComboBox16), "dd mmm yyyy")
mais j'ai toujours le 1 déc. 2015 qui s'inscrit dans la cellule.
Est-il possible que mon combobx qui s'alimente avec les dates dd mmm yyyy convertisse ce format car lorsque je choisis une date ce qu'il y a dans le combobox est dd/mm/yyyy donc pas le même format que la cellule de départ ?
Merci
J'ai changé la ligne :
ActiveCell.Offset(0, 1) = Format$(CDate(ComboBox16), "dd mmm yyyy")
mais j'ai toujours le 1 déc. 2015 qui s'inscrit dans la cellule.
Est-il possible que mon combobx qui s'alimente avec les dates dd mmm yyyy convertisse ce format car lorsque je choisis une date ce qu'il y a dans le combobox est dd/mm/yyyy donc pas le même format que la cellule de départ ?
Merci
NHenry
Messages postés
15163
Date d'inscription
vendredi 14 mars 2003
Statut
Modérateur
Dernière intervention
1 novembre 2024
345
11 janv. 2015 à 13:48
11 janv. 2015 à 13:48
Espionnes la valeur retournée par CDate et compares-la à la valeur de Now, tu verra si l'inversion est faite lors du CDate ou si c'est la cellule qui inverse.
Linebaker
Messages postés
51
Date d'inscription
vendredi 23 novembre 2012
Statut
Membre
Dernière intervention
21 avril 2023
1
11 janv. 2015 à 13:56
11 janv. 2015 à 13:56
Salut,
CDate me donne 2015-11-01 et combobox me donne 11/01/2015.
Comment on corrige cela ?
Merci
CDate me donne 2015-11-01 et combobox me donne 11/01/2015.
Comment on corrige cela ?
Merci
NHenry
Messages postés
15163
Date d'inscription
vendredi 14 mars 2003
Statut
Modérateur
Dernière intervention
1 novembre 2024
345
11 janv. 2015 à 14:12
11 janv. 2015 à 14:12
Apparemment, le CDate prend le format de ton combobox comme mm/jj/aaaa.
Je pense donc qu'un simple manipulation de chaine pour transformer jj/mm/aaa en mm/jj/aaa serait suffisant pour corriger ton problème.
Voir la fonction : Mid$(...)
Je pense donc qu'un simple manipulation de chaine pour transformer jj/mm/aaa en mm/jj/aaa serait suffisant pour corriger ton problème.
Voir la fonction : Mid$(...)
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
Linebaker
Messages postés
51
Date d'inscription
vendredi 23 novembre 2012
Statut
Membre
Dernière intervention
21 avril 2023
1
11 janv. 2015 à 14:32
11 janv. 2015 à 14:32
Salut,
Je ne vois comment MID$() pourrait résoudre le problème ???
Merci
Je ne vois comment MID$() pourrait résoudre le problème ???
Merci
NHenry
Messages postés
15163
Date d'inscription
vendredi 14 mars 2003
Statut
Modérateur
Dernière intervention
1 novembre 2024
345
11 janv. 2015 à 17:05
11 janv. 2015 à 17:05
Avec Mid$, tu reformatte la chaine, en inversant jj et mm.
Puis tu passe le tout à CDate.
Puis tu passe le tout à CDate.
Linebaker
Messages postés
51
Date d'inscription
vendredi 23 novembre 2012
Statut
Membre
Dernière intervention
21 avril 2023
1
>
NHenry
Messages postés
15163
Date d'inscription
vendredi 14 mars 2003
Statut
Modérateur
Dernière intervention
1 novembre 2024
12 janv. 2015 à 13:35
12 janv. 2015 à 13:35
Alors là je ne sais vraiment pas comment faire.
cs_Le Pivert
Messages postés
7904
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
14 août 2024
729
12 janv. 2015 à 14:55
12 janv. 2015 à 14:55
Bonjour,
Voir ceci:
https://www.excel-pratique.com/fr/astuces_vba/format_dates.php
Voir ceci:
https://www.excel-pratique.com/fr/astuces_vba/format_dates.php
Linebaker
Messages postés
51
Date d'inscription
vendredi 23 novembre 2012
Statut
Membre
Dernière intervention
21 avril 2023
1
12 janv. 2015 à 16:40
12 janv. 2015 à 16:40
Rien à faire, mon combobox dd mmm yyyy se transfert toujours en mmm dd yyyy.
NHenry
Messages postés
15163
Date d'inscription
vendredi 14 mars 2003
Statut
Modérateur
Dernière intervention
1 novembre 2024
345
12 janv. 2015 à 19:34
12 janv. 2015 à 19:34
Quel code de changement de format as-tu utilisé ?
As-tu regardé le lien de Le Pivert ?
As-tu regardé le lien de Le Pivert ?
pijaku
Messages postés
12263
Date d'inscription
jeudi 15 mai 2008
Statut
Modérateur
Dernière intervention
4 janvier 2024
2 751
13 janv. 2015 à 10:02
13 janv. 2015 à 10:02
Bonjour,
Salut tout le monde,
Bonne année à tous.
Que te réponds ce test ?
Salut tout le monde,
Bonne année à tous.
Que te réponds ce test ?
Sub Test() MsgBox Application.International(xlMDY) End Sub
Linebaker
Messages postés
51
Date d'inscription
vendredi 23 novembre 2012
Statut
Membre
Dernière intervention
21 avril 2023
1
13 janv. 2015 à 15:27
13 janv. 2015 à 15:27
Salut,
La réponse : Faux.
Probablement mes paramètres régionnaux cause ce problème, mais comme c'est un fichier partagé avec chacun ses paramètres, comment forcer le format ?
Merci
La réponse : Faux.
Probablement mes paramètres régionnaux cause ce problème, mais comme c'est un fichier partagé avec chacun ses paramètres, comment forcer le format ?
Merci
pijaku
Messages postés
12263
Date d'inscription
jeudi 15 mai 2008
Statut
Modérateur
Dernière intervention
4 janvier 2024
2 751
>
Linebaker
Messages postés
51
Date d'inscription
vendredi 23 novembre 2012
Statut
Membre
Dernière intervention
21 avril 2023
13 janv. 2015 à 15:31
13 janv. 2015 à 15:31
Non, faux signifie que tes dates sont paramétrées au format dd/mm/yyyy. Donc c'est tout bon.
A mon avis, l'erreur vient du fichier.
Peux tu nous le faire passer?
A mon avis, l'erreur vient du fichier.
Peux tu nous le faire passer?
Pour transmettre un fichier, il faut passer par un site de pièce jointe tel que cjoint.com
Va sur ce site : https://www.cjoint.com/
Clic sur parcourir,
Cherche ton fichier,
clic sur ouvrir,
Clic sur "Créer le lien cjoint",
Copier le lien,
Revenir ici le coller dans une réponse...
Linebaker
Messages postés
51
Date d'inscription
vendredi 23 novembre 2012
Statut
Membre
Dernière intervention
21 avril 2023
1
>
pijaku
Messages postés
12263
Date d'inscription
jeudi 15 mai 2008
Statut
Modérateur
Dernière intervention
4 janvier 2024
13 janv. 2015 à 16:29
13 janv. 2015 à 16:29
pijaku
Messages postés
12263
Date d'inscription
jeudi 15 mai 2008
Statut
Modérateur
Dernière intervention
4 janvier 2024
2 751
>
Linebaker
Messages postés
51
Date d'inscription
vendredi 23 novembre 2012
Statut
Membre
Dernière intervention
21 avril 2023
13 janv. 2015 à 16:45
13 janv. 2015 à 16:45
Le fichier fournit fonctionne parfaitement chez moi.
ActiveCell.Value = CDate(ComboBox16)donne le résultat voulu...
Linebaker
Messages postés
51
Date d'inscription
vendredi 23 novembre 2012
Statut
Membre
Dernière intervention
21 avril 2023
1
>
pijaku
Messages postés
12263
Date d'inscription
jeudi 15 mai 2008
Statut
Modérateur
Dernière intervention
4 janvier 2024
13 janv. 2015 à 17:13
13 janv. 2015 à 17:13
Malheureusement pas ici. De quelle manière je pourrais forcer le format ? Je n'ai plus d'idée.
J'ai essayé : ActiveCell.Offset(0, 1) = formant(CDate(ComboBox16) , yyyy mm dd mais sans succès.
J'ai essayé : ActiveCell.Offset(0, 1) = formant(CDate(ComboBox16) , yyyy mm dd mais sans succès.
