[Excel-VBA] format date [Résolu/Fermé]

Signaler
Messages postés
438
Date d'inscription
mercredi 11 mars 2009
Statut
Membre
Dernière intervention
8 juin 2015
-
Messages postés
438
Date d'inscription
mercredi 11 mars 2009
Statut
Membre
Dernière intervention
8 juin 2015
-
Bonjour,
je ne comprend pas quelque chose, enfaite je tape dans une textbox une date 05/01/2010 par exemple, et quand je regarde le resultat dans excel, il m'est affiché en format anglais à savoir: 01/05/2010
quelqu'un saurait comment faire?
Merci

4 réponses

Messages postés
12235
Date d'inscription
jeudi 15 mai 2008
Statut
Modérateur
Dernière intervention
6 janvier 2021
2 551
Bonjour,
Je crois que par défaut VBA mets les dates au format anglais. Essaie de mettre ceci à titre d'exemple :
[A1] = CDate(TextBox1)
ou
[A1] = Format(TextBox1,"dd/mm/yyyy")
Messages postés
438
Date d'inscription
mercredi 11 mars 2009
Statut
Membre
Dernière intervention
8 juin 2015
36
Bonsoir,
@pijaku, merci pour ta réponse mais j'ai trouvé entre temps, -->
ActiveWorkbook.ActiveSheet.Range("E10").Value = textbox1.Value
ActiveWorkbook.ActiveSheet.Range("E10").Value = Format(ActiveWorkbook.ActiveSheet.Range("E10").Value, "dd/mm/yyyy")

@caméline, j'avais déja vérifier ces paramètres, de plus le problèmes venait de mon code,

j''ai aussi un autre problème, -->
enfaite j'essaye de faire à peut prés la même chose qu'avant (ecrire une donnée dans une cellule au travers d'un textbox)
Sauf que la donnée à entré doit être un nombre de mois (1,2,3,15,...)
en gros j'ai ma cellule A1 qui va être une date, A2 qui va être un nombre de mois et la A3 qui réceptionne le résultat de l'addition de ces nombres de mois à ma date.
Si je me suis fais mal comprendre je peut donné un exemple.
Merci
Messages postés
12235
Date d'inscription
jeudi 15 mai 2008
Statut
Modérateur
Dernière intervention
6 janvier 2021
2 551
Salut,
En A1 une date, en A2 un chiffre, en A3 la somme des deux (sous excel utiliser la formule MOIS.DECALER) :
en VBA :
ActiveCell.FormulaR1C1 = "=MOIS.DECALER(R[-2]C,R[-1]C)"
--
Cordialement, et ..... Bonne Année, mes meilleurs voeux pour 2010!!!
-- Tout problème à sa solution. S'il n'y a pas de solution, ou est le problème? --
Messages postés
438
Date d'inscription
mercredi 11 mars 2009
Statut
Membre
Dernière intervention
8 juin 2015
36
Désolé de cette réponse tardive, sujet résolu.
Merci !

bonsoir,
Si sa peut t'aider :
Click droit --> format cellule
Onglet "nombre"
Catégorie --> date
Choisit le type le plus adapté
Paramètres régionaux --> Français (France)